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MAINDES- 
oro780.° 
$1 MAINDEC-11-DZ2DJB-0-D DJil EXERCISER AND ON-LINE TESTS PAGE 3 
52 DESCRIPTION : 
53 
35 
$5 i. ABSTRACT 
3° THIS PROGRAM CONSISTS OF THREE SuB-PROGRAMS WHICH EXRECISE 
33 THE DJ11 ASYNCRONOUS MULTIPLEXER, PROGRAM ! IS AN OFF-LINE 
55 EXERCISER. PROGRAM 2 IS AN ON-LINE "EXE ERCISER ait IcH 
35 CONTINUOUSLY TRANSMITS THE LAST CHARACTER RECEIVED. PROGRAM 
$i 3 IS AN ECHO TEST. 
3: 
$3 
3 2. REQUIREMENTS 
os ‘ 
zc 2.1 EQUIPMENT 
36 , FOP=Lt STANDARD COMPUTER WITH CONSOLE TELETYPE 
190 UP TO 16 SIL] ASYNCRONOUS MULTIPLEXERS. 
110i 
. As 
iss 2.2 STORAGE 
135 THIS PROGRAM USES ALL OF SK, EXCEPT S2SOLUTE LOADER. 
38 2.3 PRELIMINARY PROGRAMS 
iit MAINDEC-11-DZ2DJA JL2 LOGIC TESTS 
il2 
it3 4 LOADING PROCEDURE 
is USE STANDARD PROCEDURE FOR ABS TAPES. 
137 
| if 4, STARTING PROCEDURE 
12] 4.1 CONTROL SWITCH SETTINGS 
| 13 SEE 5.1 (ALL DOWN FOR WORST CASE TESTING) 
| $e 
136 4.2 STARTING ADDRESS 
| tee THE PROGRAM SHOULD GLWaYS BE STARTED AT 200. IT BE 
| TES RESTARTED AT 1000 AFTER ALL PARAMETERS HAVE SEEN Ueoe te. 
| +? 
| te 4.2 PROGRAM AND OPERATOR ACTION 
234 ) LOAD PROGRAM INTO MEMORY USING ASS LOADER. 
3c } [OAD ADDRESS 200. 


~3t 3) IF HARDWARE SWITCH REGISTER IS AVAILABLE, SET SWITCHES 
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) ENTER THE PROGRAM NUMBER i. é, OR 3). 

) SELECT LINES IF SW<8> 

} PROGRAM 1 WILL LOOP AND BELL WILL RING CNCE EVERY PASS. 
OPERATING PRO. ~ 

OPERATIONAL SWITCH SETTINGS 

Laat et ALL sui TCs DOWN IS_ WORST CASE TESTING. FOR 


PROGRA 1’ONLY, THE BELL WILL RING UPON COMPLETION OF A PASS 
OFTHE ENTIRE PROGRAM, AND ALTERNATE PASS WILL RUN WITH THE 


THE SWITCH SETTINGS ARE: 


SMCIS> B 1 ..ese HALT ON Se TOU 
SWC13> Ss 1 2... INHIBIT PRINT 
SWile> = 1 ..... INHIBIT TRACE oYRAPPING (PROG1 ONLY? 
BAUD © fb sces BELL ON ERROR 

S esses BELL ON PASS COMPLETE (PROG! ONLY) 
> Le eee INHIBIT MAINTENANCE pease ON-LINE} 
SWi8> = 1 ..... SELECT LINES FOR TEST 
PROG! ONLY: 
SWi2:00= 0 ..... BINARY COUNT PATTERN 

L csews on QUICK BROWN FOX ... ” 

B ace ALPHA-NUMERIC (40- 177)" 

3-7 "NOT USED 


THIS PROGRAM HAS BEEN MODIFIED TO RUN ON A PROCESSOR WITH OR 
WITHOUT A HARDWARE SWITCH a BT at WHEN FIRST EXECUTED THE 
PROGRAM TESTS THE EXESTENCS 2 ARD SWITCH REGISTER. 

IF NOT FOUND A_SOFTWARE SutTCH REGISTER LOCATION (SWREG=LOC. 

176) IS DEFAULTED TO. IF THIS IS THE CASE, UPON EXECUTION 
THE CONTENTS OF THE SWREG ARE DUMPED IN OCTAL ON THE CONSOLE 
TTY AND ANY CHANGES ARE REQUESTED 


(I.E. ) SWR=XXXXXX NEW= 
POSSIBLE RESPONSES ARE: 


1. <CR> IF CHANGES ARE TO BE MADE. 
e. & DIGITS 0-7 TO REPRESENT IN OCTAL THE NEW SWITCH 
REGISTER VALUE; LAST DIGIT FOLLOWED BY 


<CR>. 
3. TO ALLOW REENTERING VALUE IF ERROR IS 
COMMITTED KEYING IN SWREG VALUE. 


BUILT INTO THE PROGRAM IS THE ABILITY TO SICAL CHANGE 
THE CONTENTS OF SWREG DURING git te Thane TION. BY STRIKING 
tG (CNTL G) ON CONSOLE TTY THE OPERATOR SETS A REQUEST FLAG 
TO CHANGE THE CONTENTS OF SWREG, WHICH IS PROCESSED IN KEY 
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195 AREAS OF THE PROGRAM CODE (IE) ERROR ROUTINES,  QFTER HALTS 
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DESCRIPTION . 


S.2 


§.2.1 


S.2.2 


§.2.3 


$.3 


6.1 





SUBROUTINE ABSTRACTS 


HLT 


THIS ROUTINE (a? 4 AN_EMT ie PRINTS OUT AN 
ERROR MESSAGE (SEE §& TO INHIBIT TYPEOUTS, ei SW<13> ON 
Al. TO RING THE BLL ON AN ERROR, PUT SW<103 ON A 1. 


TRTRAP (PROG1 ONLY) 


IF SW<12> IS ON 8 0, THE T-BIT WILL BE SET ON ALTERNATE 
Passes. T IS THE PROCESSOR TRAPS AFTER 
BCH insTRUETIQN. THE FIRST ~tISTRURTTON F xEC UTED | UPON 
IN AN "RTI" 0 THE 


G S 
INTERRLET ED SEQUENCE OF IN STRU CTIONS. THIS SEQUENCE 
CONTINUED UNTIL THE END OF THE PROGRAM IS REACHED. 


TRAPCATCHER 


he = war FERENCE IS REPEATED FROM = 56 TO DETECT 
UNEXPECTED TRAPS A +2" “101 SEQUENCE IS 
REPEATED car a - ee | a. ive BNY UNEXPECTED INTERRUPTS. 


THUS a A S WILL T AT THE VECTOR + 2. ANY 
UNEXPECTED, ITER TS WILL RESULT IN AN ERROR MESSAGE AND 


PROGRAM AND OPERATOR ACTION 


AFTER THE DEVICE PARAMETERS ARE REPORTED, THE PROGRAM TYPES 
PROGRAM AT WHICH TIME THE OPERATOR ENTERS “1”, “o™, 
OR “3” DEPENDING ON tHE SUB-PROGRAM HE WISHES TC RUN. 


IF SW<@> IS ON a 1 THE PROGRAM WILL HALT, DISPLAYING THE 
DJi!1 UNIT MBER tN 7 DATA LIGHTS (RO). AT THIS TIME TH 
BPERATOR SEL 3 via T SHITCH REGISTER THE LINES OF THA 
DJ11 HE WISHES (I.E. 0» 


TO RUN SW<O> ON A | SELE 

ET ™ )}. THE OPERATOR THEN PRESSES “CONTINUE” AND THE PROGRAM 
WILL “HALT FOR THE NEXT DJ11, IF ANY MORE EXIST. WHEN ALL 
LINES OF THE EXISTING yi" S ttave BEEN SELECTED THE PROGRAM 
WILL HALT ONCE MORE WITH 177777 IN THE DATA LIGHTS <RO) TO 
BLOM THE, OPERATOR TO SET rhe DYNAMIC uerTcn” SEPT TRG (SEE 


_ ERRORS 


ERRCR PRINTOUT 
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DESCRIPTION 


ADR (R1) (RE) (RB) (RY) 

WHERE : 

ADR = ADDRESS OF ERROR HLT 

(RN) = CONTENTS OF GENERAL REGISTER “N". FROM TO 
FOUR THESE Y BE TYPED DEPENDING ON THE ON TMBER 

THE Hi E.G., HLT+3 WOULD TYPE (RI) 

- HLT Tay ITSELF) WOULD STOP AFTER TYPING 

DJADR. 

TO FIND THE FAILING TEST, LOOK AT THE LISTING ABOVE THE © 
ADDRESS TYPED. IN MOST CASES THE COMMENT BESIDE THE HLT 
TELLS WHAT WAS BEING CHECKED AND WHAT WAS EXPECTED. 

ERROR RECOVERY 


RESTART AT 200 OR 1000. 


ERROR COUNTER 


AN ERROR COUNT IS KEPT IN “ERRORS” (LOC 1202). IT CAN BE 
CLEARED FROM THE eee BY RESTARTING AT 200, OR BY 
RELOADING THE PROGRAM. 


RESTRICTIONS 


THIS PROGRAM REQUIRES THAT THE DEVICE ADDRESSES FOLLOW THE 
FLOATI NG ADDRESS CONVENTION (DHI1°S WILL BE FIRST, STARTING 
At 160010, THEN THE DJii’S) AND tha’ THE VECTOR “ADDRESSES 
ALL BE CONTI GLOUS 


IF THIS PROGRAM IS th WITH A MONITOR, I.E. ACT11 OR OOP, 
ONLY PROGRAM 1 IS RUN 


MISCELLANEOUS 


EXECUTION TIME (PROG1 ONLY) 


DUE TO THE VERIOUS BAUD RATES AVAILABLE AND THE ABILITY TC 

CHECK UP TO 8 DJ11°S AT ONCE THE EXICUTION TIME CAN VARY 

ANYWHERE FROM 3 SECONDS Hf NEARLY HOUR.. THE FOLLOWING 
is ONE DJil WITH ALL LINES AT THE SAME 
2 ST OF Bits. AND NO PARITY sf 
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DESCRIPTION 


BAUD RUN TIME 


STACK POINTER 
STACK IS INITALLY SET TO 1200 


PASS COUNT (PROG1 ONLY) 
A 26 BIT (2 WORDS) PASS COUNT IS KEPT IN “PASSES” (LOC 


1204, 1206). CLEARED FROM THE CONSOLE, SY 
RESTARTING AT 200, OR BY RELOADING THE PROGRAM. 


POWER FAIL 
EACH PROGRAN CAN BE POWER FAILED WITH NO ERRORS. 10 USE 
START THE Ay AS USUAL AND POWER DOWN THEN UP AT ANY 


TIME. THE ROUTINE SHOULD TYPE “POWER” AND RESTART THE 
PROGRAM WITH NO OTHER ERROR TYPEOUTS. 


PROGRAM DESCRIPTION 


THIS PROGRAM CONSISTS OF THREE SUB-PROGRAMS WHICH EXERCISE 
THE LOGIC OF UP TO 8 DJ11 ASYNCHRONOUS DATA MULTIPLEXERS. 


ts ge Aye sit (OFF-LINE) 
XERCISES UP TO 256 LINES (16 DJ11°S) 
MAINTENANCE MODE. THREE rere rer 


T ASSES WITH ALL 
WITCHES DOWN. SW NE BISABLES THE MAINTENANCE 
MODE, REQUIRING TURNAROUND CARDS AT THE TERMINATION OF EACH 
LINE BEING TESTED. 


PROGRAM 2: CONTINUOUS ECHO EXERCISER (ON-LINE) 
THIS PROGRAM CONTINUOUSLY TRANSMITS THE LAST CHARACTER IT 








i ais _— —— En 
j 





OZDJ8D.P11 


369 RECEIVED ON THE RESPECTIVE LINE. A... .090) WILL “ECHO” 
370 72 TIMES AND THEN TURN OFF THE TRANSMITTER. 


| 
| 
| 
| 
| 
| 
| 
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| 


MAINDEC-11-D2D8-D-0 DJil EXERCISER AND ON-LINE TESTS MACY11 27(732) 21-SEP-76 13:54 PAGE 13 


0} a ee eee 


MAINDEC-11-DZDJB-D-D 
DZDJ80.P11 


004099 
cd2009 


091000 
900400 





DJil EXERCISER AND ON-LINE TESTS MACY11 27(732) 21-SEP-76 13:54 PAGE 14 


MAINDEC-11-DZDJ8-D-D § DJ11 EXERCISER AND ON-LINE TESTS PAGE 8 
DESCRIPTION oS. 


PROGRAM 3: ECHO ir Cees 
THIS PROGRAM TRANS ott (#ECHO TEST#) Ov EACH LINE 


CAUTION: EEp09 EVERYTHING. REC IvEb. FASTER THAN THEY CAN BE 
TRANSMITTED, THE SOFTWARE BUFFERS MAY OVERFLOW. 


NOTE: THE ON-LINE EXERCISERS (PROG2 AND PROG3) ARE OPERATOR 
DEPEN CENT, AND THEREFORE DO NOT LOOP. I.E. NO PASSES. 
ACTI1 AND'DDP MONITORS WILL ONLY RUN PROG 1. 


.ENABLE 
TENABLE A 
; PROGRAM BY KEN CHAPMAN 
; SWITCH USE 
SwiS= 100000 HALT ON ERROR 
Swi4¥= 40000 U 
SWi3= 20000 TINAIBTT- ERROR TYPEOUTS 
SWi2= 10000 :NOT USED 
SWll= 4000 ;NOT USED 
SW10= 2000 ;0 - BELL ON PASS COMPLETE 
:1 - BELL QN ERROR 
SW3= 1000 SON-L INE ( 


1) 
SW8= 400 *SELECT LINES CINZTIAL IZATION TIME ONLY) 
+ gHO:2) SELECT neeeace (PROG1 ONLY? 

DJ11 REGISTER BIT ASSIGNMENTS: 

CONTROL STATUS REGI REGISTER. (CSR) XXXXX 


RB EORRLE ce AD/WRITE) 
BIT] UE LEX SELE ECT te) ITE) 
BIT2 RAINTENANCE. (READ/WR 

CLEAR M 


BIT3 OS (WRITE ONL 

BITY CLEAR MOS FLAG (READ “ONLY) 

BITS NOT USED 

Bits Receiver poenat ENABLE (READ/WRITE) 

Bite be ER TRANSMITTER SCAN ENABLE (READ/WRITE) 
BtTtO ROT USED BREAK REGISTER (READ/WRITE) 

BITle i nat 

BIT13 FLED. OVERRUN AD ONL 

BIT14 TER TRANSMITTER INTERUPT PvGLE (READ “WRITE ) 
BITIS TRANSMITTER READY (READ ONL 


RECEIVER BUFFER REGISTER (RBUF) XXXXX2 (READ ONLY? 
BITO-7 RECEIVED CHARACTER 








warNrnoscr: 
. RINCES- 
ASA CRA 


Bee See Oe ae ee ee Se Oa Oe ee oe ee 
GIGDIGIGIAIG IG IGIGIO MITE 


CDT Ce AIC TIN Eat ede + pats” 


BOe 
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BiTS-11 LINE NUMBER 

SITi2 PARITY ERROR 

BIT13 FRAMING ERROR 

B'Ti14  UART OVERRUN ERROR 

BIT1S CHARACTER PRESENT 


TRANSMITTER CONTROL REGISTER (TCR) XXXXX4 (READ “URITE) 
EITO-iS STOP THE SCANNER ON CORRESPONDING LINE 
TRANSMITTER BUFFER (TBUF) XXXXX6 


SITO-7 TRANSMITTED CHARACTER (WRITE ONLY? 
BIT3-.1 LINE NUMBER (READ ONLY? 


SREAK CONTROL STATUS REGISTER (BCSR) XKXxx4 (BITIO OF CSR SET) 


SITO-15 TRNSMIT A BREAK ON CORRESPONDING LINE! 


StoPe= TRAP 
HLT= EMT 
TYPES [QT 
PS= 17777 
RO= "0 
Rl= “2 

F2= “2 

R3= %2 

R4= “ 

ES= “S 
TTYs “5 

SP= nS 

ec= te 
BELL= 7 
BITo= i 
SITis e 
Bit2= 4 
BIT3= 10 
BIT4= 2c 
BrTs= 49 
BITE= 199 
BIT?s 209 
Br7Tes 402 
BIT9= 1006 
Bilis 2o0u 
BITll= 4000 
BiTie= 109000 
BITi3= 20000 
BIT:4= 40009 
BIT15= 190009 
LEVEL? = 340 
OPEN = 9 


—— ee oe eee | + ee ee ee - 
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CIDISO.P LL S31! SPECIFICATIONS 
! 
| ine BB am td ea dd SORUIRIE QIN Tbrewcrme 
| gg eer. sosarroRe? 4 THRU S& CONTAIN " ih? oe shai Feet opt 
| 43: SLOCATIONS 60 THRU 77 CONTAIN ". 42" Be "ToT" TN EVERY VECTOR : 
3: 
; 483 
“35 
48S Clos = 45 
s3— 000088 ST33iC SENDAD 
487 
488 o00174 .2 | (M4 
489 900174 35950 rSPRES:6 
4§0 Sésivs BSSa8 SwRES: 3 
432 . 
433 oco2cc 2 22 
|} 483 soozoc 55513? oos30s IMP BEGIN ;200 ALWAYS IS THE STARTING ADOSESS 
/ 488 B0;559 = 000 :RESTART ADDRESS 
: = 495soconeoo «SCOS? §«o0saz2 JME" = RESTAR 
i oss 
| 497 091200 = 1200 ; 
|} 498 961200 900° we SITERATION COUNT-LH, TEST NC. -RH 
} 8985 50:20 goood _ ERRORS: § TERROR COUNT REGISTER - 
| Sec Soteo4 So00d8 coger PONT: 0,0 :5ASS COUNT REGISTER ~ 
| ERE 
| EFS aorero arrszo SUR: 177570 
| ERs S0le12 ir7re DISPLAY: 177570 
3 221224 9g9000 SAVIT: 9 ‘ i 
so? oSizis TIMES: 20 sMINIMUM NUMB?3 OF MESSAGES (PROG!? 
| §5s 801229 dgodd00 SWRSAV: 9 , hp 
| 855 Sot222 000000 SvSWO: OPEN :MAP OF LINES SELECTED, OJ11 aC 
| §10 Sdize4¥ 900000 SvSW1: OPEN iMAP OF LINES SELECTED, DJi1 #! 
| $11 501286 oo5009 SvSWe: PEN :MAP OF LINES SELECTED, OJ11 #2 
| $812 O01230 900900 SvSwa: OPEN :MAP OF LINES SELECTED, DJ1! a3 
, §13 091232 900000 SvSwa: OPEN iM OF LINES ZELECTED, DUii #8 
| 835 551234 000000 SvSWS: OPEN :MAP OF LINES S=LECTED, DJ11 85 
Sis 501236 900000 SvSWe: OPEN imap OF LINES SELECTED. DYi1 #6 
St& 09124C SvSw?: OPEN MAP OF LINES SELECTED, DJil #: 
iv So1e42 900000 SvSW10: OPEN MAP OF LINES SELECTED. Out] a1 
Sie 01344 909000 SvSW11: OPEN :MAP OF LI LECTED, DJ11 #11 
51$ Size 090000 SvSwie: OPEN :MAP OF LINES SELECTED, DJ11 ale 
2c OC1es0 900000 SvSW1a: OPEN :MAP OF LINES SELECTED, DJ11 #13 
521 oo1e52 000000 SvSWid: SPEN ama OF LINES SELECTED. CUI ati 
22 901264 090000 SvSwiS: OPEN MAP OF LINES SELECTED: DJ11 s15 
 €23 00:25 900000 SvSwib: OPEN :MAP OF LINES SELECTED, OJ11 al& 
| pee ppleee Eeaaen Syul7: OPEN :MAP OF LINES SELECTED, DJ1! al? 
~ PS 
Se Scie64 900000 BUFSIZ: 20 -RECEIVE SUFFER SIZE <PROG3) 
x7 Oclebe C0001" BUFMSK: 17 ;BUFSIZ-1 
Py 
£23 001272 00000: UNITS: 1 NUMBER OF UNITS ON THE SYSTEM 
530 901272 160010 DEVADR: 160010 cEAR ST DEVICE ADDRESS 
E31 Stie74 900305 VECADR: FIRST VECTOR ADDRESS 
S32 sitive 165015 FLTADR: 160010 SFIRST FLOATING DEVICE ADDRESS 
633 0lzec oc0300 FLTVEC: 390 SFIRST FLOATING VECTOR ADDRESS 
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;RECEIVER BR LEVEL = § 
; TRANSMITTER BR LEVEL = 

pRRRRERERERER REE RSE EER EERE REESE ERASE EERE EEE E EEE EE RA EASE EE THEE R EEE EE EEE 
Pret errerertereerererrerrrereT Terr tr Tt Terr Trt TTT Tr Terre rer rer ereen 
; TRANSMIT DATA POINTER TABLE 


;RECEIVE DATA POINTER TABLE (PROGI) 
;RECEIVE’ DATA TABLE ‘PROG2 AND PROG?) 


; TRANSMIT DATA COUNTER 
RECEIVE DATA COUNTER 


CHARACTER MASK TABLE * 


sass aps et, 
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SET UP AREA 


001200 


001276 
CO0001 
000802 


000210 


O0OS0& 
001270 


015254 
Ol3e4e 


900920 


0000 3 
014406 


o00Co& 


BEGIN: 


1S: 


2s: 


BGT 
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BICNT SET UP STACK POINTER 
PC Susur 

ali, RY (RO)+  ;TRACE TRAP VECTOR (14) 
1340 (RO)+ 


o alQTReP, + (RO)+ sIOT VECTOR (20) 

ePOOINS, (RO) :POWER FAIL VECTOR (24) 
aenrs. (RO)+ EMT VECTOR (30) 

#340 (RO)+ 

#1$, 0810 

#RTT, Q8YESRT 

BRIT: aes 

#400, 8177774 ~=©;SET UP STACK LIMIT TO 1000 


ERRORS ;CLEAR ERROR COUNTER 

PUNT ;CLEAR PASS COUNTER 

#300, RO ;START OF FLOATING VECTOR AREA 
(RO)+ i UPOATE POINT 

RO -2(RO) ;PUT “.+2" IN EACH VECTOR 

wI0T, (RO)+ SAND “1oT 


#1000, RO :CHECK FOR END OF FLOATING VECTOR AREA 
2s BRANCH IF MORE 


5 EERREREER ET EAEAERERE REL EAL ER LEAD FLEE REREEE RE RARER AREER ESR EAREEEER ELE DEES 
;ROUTINE TO MAP ALL THE DJ11°S CN THE SYSTEM 
j ERERELERRERERE AER ERE LEAR LAR AE ER LEELA ER EERE RESERERRERESEERERER EEE ARERE 


DIMAP: 


i$: 


6S: 


7$: 


FLTADR, RO ;GET FIRST FLOATING ADDRESS 
#1 Re ?COUNTER FOR DJ11°S 
eRTI, aa “RTI WHEN TIMEOUT 
Ri :SET UP COUNTER 
; CARRY 
(RO) :CHECK FOR A DEVICE 
75 ; BRANCH IF NONE 
#10, RO 60 10 NEXT DEVICE ADDRESS 
R1 :COUNT DJ11°S 
1$ LOOK FDR MORE 
AY 3 ;RESTORE TIMEOUT VECTOR 
Rl UNITS :SAVE COUNT 
Ge tveC TYPE "NO DJ11°S!" 
SF ATBL Beebe 
JeDONE : RESTART 


; RERLESRERERERRA SAL RLERRRRELA REAR RELERRERAARLREAEREREELERAR ERAT RARARAARE 


ROUTINE TO DETERMINE VECTOR PODRESSES OF DJ11 
 SDESUSAESSESAESSRSUSELSESESSESOTELSSOSEGSEAEATEMEEEORAEEEAEAEREREAEONE 


GETVEC: MOV 


oee0, -\SP) ;SAVE IOT VECTOR 












DZDJB0.P 


807 ocsss4 


Boeeee 





TOOrrwrow 


et ett eat ate os) 
8 
o 
fo 








005760 


oo ee wee 


a 


DJ11 VECTOR MAPPING ROUTINE 


012737 005604 900020 MuV 1S, 9420 ;RESET 107 VECTOR 
BLSrtt RAE Vk Ol 
sB1TBs TARAS INTERRUGT ENABLE 
612761 00000: ococ004 MOV #1, 4(RL) io R 
000001 WAIT wAIt FO NTERRUPT 
000497 BR 3$ CONTINUE aren INTERUPT 
011802 1$ MOV (SP), ;SAVE VECTOR ADR. (+4) 
182716 000010 SUB 10 (SP) ‘REPOSITION ADR TO RCV. VEC. 
411837 001274 MOV (SP},  VECADR ; SAVE FIRST VECTOR 
022626 CMP (SP)4, (SP)4 ;RESET STACK FROM I0T 
oos0de2 RTI :RETURN FROM INITIAL INTERUPT 
012637 000020 38: MOV (SP)+, a#20 ; RESTORE I0T VECTOR 
00S742 TST (Re) “POINT TO XMT. VEC. 
913703 001270 MOV UNITS, R3 >SET UP UNIT GounTER 
;CHECK THAT VECTORS ARE CONTIGUOUS 
061 coo0o4 2s: CLR 4(R1) CLEAR TCR 

005011 CLR (RL) -CLEAR C 
O12712 ooo004 MOV BI0T, (Re) SEESTORE: Ror TO XMT. VEC. +2 

5303 DEC R3 *CHECK FOR MORE DJ1i°S 
001415 BEQ REPORT ; BRANCH IF DONE 

e00010 ADD #10, Ri :UPDATE DJ ADR. PCINTER 
000910 ADD #10 Re ; UPDATE VECTOR POINTER 

Olevia o0o0de MOV eRTt, (R2) :RTI ON INTERRUPT 
O12711 oO4040 MOV #40400, (RI) 
012761 00001 ooo004 MOV e UCR) eet LINE O 

500% WAIT :WAIT FOR AN INTERRUPT 


;REPORT CONFIGURATION 


173276 REPORT: 


015136 TYPE, 

913705 001272 MOV en TTY s TYPE DEVADR IN OCTAL 
094737 O1NOEY JSR PRINTR :TYPE LEADING ZERO’S 

013705 001274 MOV SGvEC TTY ; TYPE VECADR: IN OCTAL 
004737 014074 JSR PCP PRIATS :AND SUPRESS LEADING ZERO'S 

0004 gisele TYPE, | MSGN 
013705 60127 MOV UNITS. TTY ; TYPE UNITS IN OCTAL 
004737 614074 JER PC, PRINTS ?AND SUPRESS VEAGING ZERO'S 


DJ11 EXERCISER AND ON-LINE TESTS 
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TYPOUT 





seit is, aSWR 
§ Mes 

















OZDJBO.P11 


00605¢ 
re 006054 
679 O0S0be 
680 006065 
681 006070 
‘682 906072 
683 906076 
-684 006102 
685 006106 
686 
687 
£88 
685 
696 
691 
$92 
633 
694 


i 
sotaiaital gatatal taatatstatatat 


SHOE LVR EUR LVS Loo 


echt) 


MAINDEC-11-D20J8-D-d 


OJ1 
CH 


00017& 00:210 


174000 


000010 
000049 





c 
—~ 


] EXE 
ARACTE 


020006 


RCISER AND ON-LI 
R LENGTH MAPPING 
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| PRARRARA AERA RA AA RESALE RRA AK AAR ARAL A ALARA AREER ARAL LE LEAR AREAS RASA ESHER SS 


;ROUTINE TO MAP CHARACTER LENGTHS 
5 SERRE SEE SEHR SRE SE SESE EEE EE EEE 903 EAE SE SRE SEE HEHE HE RR EAE ERE EE A 


#SWREG, SWR 

; CNTLU 
UNITS, RO 
DEVADR, RI 

#1 Re 
#415, (RL) 
agiT4 (RI) 

g 4(R1) 
(Ri) 

3$ 

#377, 6({R1) 
Re 
Re 
2$ ' 
Ho. RI 
20 - 
-3 
eNITS, RO 
DEVADR, Rl 
#MASK,” Re 
#4 R3 
2(R1), RY 
o$ 
RY, RS 
RS 
#177760,R5 
RS 
Re, RS 
RY 
#174000, 84 
R4, (RS)+ 
RY, (RS)+ 
RY: (R5)+ 
RY: (RS)+ 
R3 
S$ 
#10, Ri 
#40; Re 
RO 


















Hg a COUNT 
re ie hea ADD Ess POINTER 


REV ENB fos MAINT.» TRANS SCAN ENB 
: WAIT 8, MOS TO CLEAR 


: TRANS CONTROL, ONE LINE AT A TIME 
WAIT FOR TRANS READY 


;SEND A RUBOUT 
SKIP 4 LINES 











;BRANCH BACK IF MORE LINES 


iC AR 1 
ATE POINTER TO NEXT UNIT 
CHECK FOR MORE UNITS 


;SET UP UNIT COUNTER 
:SET UP DEVICE AODRESS POINTER 
;SET UP CHAR LEN TABLE POINTER 
SET UP CHAR COUN 

SERVE AND CHECK. CHAR PRESENT 












;DUP_DATA 
LINE # IN LOW BYTE 
iC EAR ALL BUT LINE 8 


MAKE eter TO CHAR. TABLE 
:MAKE DOTA INTO MASK 


CLEAR RB 
:SAVE THE 
: SAVE THE MASK 
i SVE THE 


; MASK 
sCOUNT TO 4 


;ADDRESS POINTER TO NEXT DJ 
sCHAR LE un Loa POINTER 


BRANCH BACR IF MORE 












DzDJ 


708 
798 

709 

719 

at 

713 1 Kane 7? g0004e 
714 pete wes 

71S 006200 d0COG4% 015235 
£18 persia aA 013520 
fe O062i 

718 OO06ele 001367 

719 006214 O13700 001270 
720 O062e20 QO12701 O0le2e 
721 O06224% Ole7el 177777 
7 006230 005300 





724 006234 ¢77 000400 


726 006244 005000 
7e? ~O062% Ole701 OOle2e 
728 006252 


729 O0SeSe 000004 O06eSS 
730 006300 004537 013520 


73e 006306 013721 001214 
733 005200 
734 O0631% 020037 001270 











33 

740 O0632e2 013700 OC06344 

741 006326 

742 006330 Oee700 c00003 
0962334 





300 
745 00534C 900170 006344 








-D2DJ8-D- 1 EXER 
A at 11-D2DJ8-D-0 Abt ain es I 


172746 


j REE RARE EERE REAR ARERR EERE ERE ERE RE ERE ER EEE SEA EE EE 
; SELECT THE ee 
GRAM 4: 


TREE ON AND ON-LINE TESTS MACY11 27(732) 21-SEP-76 13:54 PAGE el 


: PROGRAM 
: PROGRAM 


al FS REFLERELRE 


SELPRO: TST 
BNE 


SWITCH: 


-SBTTL 


RESTAR: 


PROGNO: 
Pp 


ROGAD: 1 


SF /PRO 
-BPROGAD (RO) 





TO BE 
Fr -LINE® EXE 
On-L THe EXER ciSer (78 C TRONSHTT LAST CHARACTER RECEIVED; 






eve ;CHECK FOR ACT 11 OR DOP 
ESTAR "BRANCH IF MONITOR 

MSGPRG 

RS READIN ;READ A NUMBER FROM THE CTY 
PROGNO 

SELPRO 

UNITS. RO ;SET UP UNIT COUNTER 





aSVSWO,R1 :SET UP SWITCH TABLE POINTER 
8177777, (RL)+ ier ALL LINES 












1$ ; BRANCH IF MORE 

sBITE aSWR  ; CHECK FOR SW<8>, SELECT LINES 
RESTAR ?BRANCH IF NOT 
RO :SET UP UNIT COUNTER, DISPLAY 
#SVSWO,R1 :SET UP SWITCH TABLE POINTER 

+2 ;.ASCIZ <15><12)>"SELECT LINE = ” 
RS READIN 
SAVIT 





SAVIT, (R1)+ 
sCOUNT UNITS 

RO UNITS CHECK FOR MORE UNITS 

SWITCH “BRANCH IF MORE 









RESTART POINT 


PROGNO, RO 
SELPRO’ 












;DEFAULT TO PROGRAM 1 











oO 


fil 
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EXERCISE a f 


a 






752 
753 a, s RERRREKE REAR RAR AAA AAA RAR A RAR AREER A RRA ALAA AAR ALEK REARS AKERF RAL AAS RRE SY 
ced :PROGRAM 1: “ans AND 5 ALL LINES SIMULTANIOUSLY 

5 : 0 -LI 

756 ; LINE: SW<9> 

757 : OSes THE DATA feet SELECTED BY SW<2:9> 

758 ; EACH LINE REPEATS THE PATTERN AT LEAST 8 TIMES 

759 : PER PASS. I.E. THE FAST LINES MAY GET 

760 OR THE SLOW LINES 

751 Serer t tet ttt treet 










763 006354 900005 PROG1: RESET ;CLEAR OUT THE WORLD 
764 006356 O12706 001200 MOV #ICNT *RESET THE STACK POINTER 

765 006362 052737 000340 177776 BIS #240 Sape” :PROCESSOR TO LEVEL 

766 006370 012701 001306 MOV #XMTTAB,R1 FIRS TABLE PO NiER’ 

767 006374 Ole702 001400 MOV 81400, R2 ENGTH OF TABLES (WORDS) 
768 OO8400 O00S021 13: CLR (RL)+ : CLEAR THE TAB 

769 O06402 005302 DEC Re 

770 006404 001375 BNE 1$ 

771 O06406 O!2702 og0400 MOV #400, R2 s LENGTH OF MASK/COUNT TABLE 

772 OO64ie 005291 2s: INC :SKIP MASK 

773 008414 105021 CLRB 3s (R11) + :CLEAR COUNT 

774 0064:6 005302 DEC fee 

Me 096420 901374 BNE 2$ 

777 s ROUTINE ae INITIALIZE ALL DJ11°5 AND THEIR ISR’S: 

778 -SET UP ALL INTERRUPT VECTORS 

779 SET UP DEV ICE ADDRESSES IN LINKER ROUTINES 

780 >SET CSR’S EVERYTHING ENABLED 

781 -SET TCR’S, ALL LINES ENABLED 














732 
783 O06422 o0S000 PLINIT: CLR RO 
784 494 013701 001272 MOV DEVADR, Rl 
785 006420 913702 001274 MOV VECADR, Re 
786 05434 012703 006756 MOV #RISRO, R3 
787 006440 010322 11S: MOV (R2)+  ;SET UP RECEIVER INTERUPT VECTOR 
788 O06442 013722 001302 MOV RCVLVL, (Ro)+ 
789 OO6446 O22323 CMP (R3)+,' (R3)+  ;ADD 4 TO R3 
790 O064S0 010113 MOV 2 (R3)  3ADDRESS OF CSR 
791 O064S52 062723 o00002 ADD (R3)+ ADDRESS OF RBUF 
792 OOS4SE 005723 TST (R3)+ 
793 OO64ED. 010322 MOV (R2)+  ;SET UP TRANSMITTER INTERUPT VECTOR 
794 006462 013722 001304 MOV XMTLVL, (Re)+ 
795 OO6466 Oe CMP (R3)+," (Ra)+ | 
006470 O10123 MOV (R3)+ — ;ADDRESS OF CSR 
797 006472 O0SO11 CLR (RL) CSR 
798 006474 032777 OO1000 172506 BIT #BI1T9, aSWR. :CHECK FOR ON-LINE 
799 006502 O01002 BNE 12$ :BRANCH IF ON-LINE 
890 OO06504 012711 coooo4 MOV w8IT2, (Rl) SET THE MAINTENANCE BIT 
80: 006510 052711 Os0Si0 123: BIS #50510, (Rl) ;SET UPC 
852 | :BIT3 = CLEAR MOS 
303 *BIT& = RECEIVER INTERUPT ENABLE 
804 ‘BITS = TR ANGI TTER SCAN ENABLE 
g0s :BIT12 = STATUS ENABL 
606 :BIT14 = TRA BNGRITTER INTERUPT ENABLE 
847 006514 032711 oco0020 138: CHECK FOR MOS TO CLEAR 
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OZDJBO.P11 PROG1: OFF-LINE EXERCISER 


13$ 
#1, (RL) SET RCV ENABLE 
(RL)+, (R14 nes POINTER 
SVSWO(RO),(R1) :SET TCR "sir S 
RO RESTORE UNIT COUNTER 
001262 SET UP MARKE 
GET SWITCH SETTINGS 
MASK MESSAGE # 


Y FOR LINE SELECTED 


co 00 000000 CoCo aD aN aN Lo 
1 b> 2 p= b> 9 fe fo po 


001306 
002306 
003306 


003307 
004307 


WM -OWONIMU CWO 


rororore 


(4) 
;INC OFFSET TO NEXT LINE 


14S 
(R1)+, (R1)+ ;ADD 4 


001270 i UNITS 
000140 #140, daPS ;LOWER PROCESSOR PRIORITY 


5 RRALAALALA LALA REE REE LLL LE LARA ALLE LEAL ALAA A EHR ER AREA RELA AERA ERERELAALELE 


PROG! BACKGROUND PROGRAM TO MONITOR TABLE. 
eg 17 eee 


; NOTE - PROGRAM MAY HANG IN A 
; IF THIS HAPPENS, RUN DZDJA. 

012701 004307 FORGND: MOV sCNTTAB,Ri 

012702 MOV #40U, Re 


000400 
218: ;CHECK FOR COUNT TABLE CLR 
BNE ;BRANCH IF_NOT 
ocoode ss oe TQ NEXT LINE ENTRY 


L 
;BRANCH IF MORE LINES 


BNE 2i$ 
004307 aCNTTAB,R1 
000400 #400, Re 
000200 : #200, (R1)+ ;SET ALL DONE F 

INC Ri INC TO NEAT LINE E ENTRY 


;COUNT LINES 
;BRANCH IF MORE LINES 


225 
#RCVCNT RI 
#400, Re 
(R1) ;CHECK FOR RECEIVER DONE 
Ba BNE 238 ;BRANCH IF NOT DONE 
ooau0e #2, Rl ;60 TQ NEXT LINE ENTRY 


:COUNT LINE 
BRANCH IF MORE LINES 
:SKIP ISR’S 


903397 
00040v 


BNE 23$ 
009137 Ol3e42 d#DONE 





ae ptt 20J8-D-0 


P $3 
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5 RERERH KRALL LALLA R AREER RARER ALE AREA RE RAR ELA RE RRELE REEL RRRELEREELELE LES 


PROG LINKERS TO DJ11 INTERRUPT SERVICE ROUTINES 
HAHEI HBG HEHEHE HEHEHE HEHEHE IIE 





RISRO: 
XISRO: 
RISR1: 
XISR1: 
RISRe: 
XISRe: 
RISR3: 
XISR3: 
RISR4: 
XISR4: 
RISRS: 
XISRS: 
RISR6: 
XISR6: 
RISR?7: 
XISR7: 








VISR 
CTGGL e+ 08100 >, HOO 
<160010+<0%10>>, <40#0> 

at 
(1600124«1#10>>, <40#1> 
{16001081109 >, «40#1> 
Ciao e+ 26100», <40#2) 
<1600104<2#10) >, <40%2) 
¢1600124<3#10)> , <40#3) 

SR 
160010+<3#10>>, <40%*3> 
1eoGler 44100 >, <40%4> 
Loscue10>>, <«40%4> 
123<S#10)>, <40%5> 
10+<5#10>>, <40%5> 
12+<6*10>>, <40%6> 
0010+<6%10>>, <40%6> 


5-5-3373 3-3 
Ba8s52 383283583558 3838% 
Se oe eS eee 

Wire 4S Oe ik. Sate. _ 


<—- 
—Or 


g 
= 


~ 
rp 


RISRIO: F 
XISRIO: J 
WORD 
RISR11: 
XISR11: JSR 
RISR12: J 
XISR12: 3 
RISR13: J 
XISR13: JSR 
RISR14: J 
. WORD 
XISRI4: JSR 
WORD 





(1600124< 10%10>>, «40*10> 
1600102 10%10)>, <40%10> 
600 }2+<11#10>>, <40#11) 
(1600104<11#10>>, <40*11> 
RO, RCVISR 
(1600124<12%10>>, <40*12> 
RO, XM 
(160010912410) >, <40%12> 
RO. RCVISR 
<160012%<13#10>>, <40%13> 
¢(1600104<13#10>>, <40#13> 
RO, RCVISR 
<160012%< 14#10>>, (40% 14> 
C{B0010+<14*10>>, 40x14 




























OZDJBD.P11 


007462 
966 007464 
367 466 
$68 007470 
969 


974 007472 
975 90747e 


MAINDEC-11-DZDJ8-D-D 


32) Oorsue 
G22 007306 


o000 
—— 
fo 
a 


—o8 
ie. 
“~ 


C10146 


ISR LINK 


000007 
003306 
001306 
003306 
001306 


001306 


ocooo4 


DJil —-" AND ON-LINE TESTS 











MACY11 27(732) 21-SEP-76 13:54 PAGE 2S 





RISRIS: JSR RO, RCVISR 

-WORD << 1600124+<15%10>>, <40#15> 
XISRIS: JSR TISR 

.WORD  <1600104<15#10>>, <40#15> 
RISRI6: JSR RO, RCVISR 

LWORD © 160012+« 16%10>>, <40#16> 
XISRI6: JSR RO, XMTISR 

-WORD <1600104<16%10>>, <40*16> 
RISR17: JSR RO, RCVISR 

LWORD <1600124<17%10>>, <40#17> 
XISRI7: JSR T 


RO, XMTISR 
-WORD 1600104<17%10>>, <40#17> 
[BEE II E 


:PROG1 TRANSMITTER INTERRUPT SERVICE ROUTINE 
eirttitit titi tet titi t itt tet itt it ili tilisitirirererererereorese 


XMTISR: 
MOV 


R1,-(6) sPUSH R1 ON STACK 
MOV Re. -(6) :PUSH Re ON STACK 
MOV RO)+,R1 
1S: ST (RL) ate FOR TRANS READY 
MOVB  7(R1),Re ;GET LINE NO. 













ADD (RO) ,Re 

iSTB XMTCNT (2) ; TST FOR ZERO 

MOVB § @XMTTAB(2),6(1) ;SEND A CHARACTER 

DECB § XMTCNT(2) :COUNT CHARACTERS 

INC XNT TAB 2) ‘UPDATE TABLE POINTER 
2s: MOV R3,-(SP) 

CLR XMTTAB(2) ;CLEAR TABLE POINTER 

SUB (RO) Re 


BPL 3$ 
BIC R3, 4(R1) :CLEAR TCR BIT FOR LINE 
MOV (SP)+,R3 “RESTORE R3 
“ BR 1§ 
MOV (6)+,R2 ;POP STACK INTO R2 
MOV (6)+,R1 :POP STACK INTO RI 
Hoy (6)+,RO : POP STACK INTO RO 


5 REALE LALLA EASA SAAR RRAER ALE LAE RE REEL EARLE ARERR AER RARERARRARE RAR ET 


;PROG1 RECEIVER INTERRUPT SERVICE ROUTINE 
52 GGG EGGS SG a 


RCVISR: 


MOV R1,-(6) ;PUSH R1 ON STACK 





Siatetatntntatatetatat =: 
—-OWOONOU£SWM-O 


fo 


aN C-11-D2DJ8-0-0 


Pll 


4 
CO7656 
067670 
207672 


_- -—-—- - 





Rida EX EXES 


070000 


070000 


902305 
goNa08 


177490 


co00de 


Giger AND ON-LINE TESTS 


2$: 


6$: 








BEQ 1 

IF THE ABOV: 
CONTINUE 
THE 


Re, -(6) 


Ba» = {8} 


#70006, Re 
es 


#70000, Re 
Re, RY 


RY 


(RO) RY 
JRCVTAB(RY) RB 
MASK(4) ,R3 


’ 


3 
#177400,R3 
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;PUSH Re ON STACK 


ss Ra BN STACK 
THe 


HE DA 
fm IF NO CHAR PRESENT 
i CHECK FOR ERRORS 


; RECEIVER ERROR 
UF S 


S 
TENTS OF RBUF 
sBIT1esPORITY ERROR 


HBITIGeUeRT Ov OVERRUN 

AR ERROR BITS FOR SPEED 
‘SOP T 
;CLEAR THE DATA 
:LINE : TO LOW 
pat ALSO CLR CHAR PRESENT 


GET EXPECTED DATA 
MASK CHARACTER LENGTH 


;BRANCH IF 0 
; MAKE pune UPPER BYTE CLEAR 
DATA ERROR 


:R1=RBUF ADDRESS 
RE=CONTENTS OF RBUF (DATA) 


Re=C 


sLINE 





RROR 


YTE 


;RS=EXPECTED DATA 


(DON’T RESTART TRANSMITTER) 
ONE (DON’T oat tte ar: 1 hile 


MPLETED 


RCVCNT (4) 
RCVTAB(4) ;UPDATE TABLE POINTER 
1 : CONTINUE 
CNTTAB(4) :CHECK FOR DONE 3 MESSAGES 
1 s BRANCH a ONE 
gt QGATION 1S’ PATCHED 10, 1402, THE FAST 
N UNTIL ALL LINES HAVE COMP 8 hess crac 

Way’ IT 15, CODED NOW, ALL LINES COMPLETE JUST 8 MESSAGES. 
QSWR,R3 ;GET SWITCH SETTINGS 
#177770,R3 0,R3 :MASK SW<2:0> 
ADRNIT(3) (4) 

RNIT(3) (4) 
CNTNIT(3) (4) 
CNTNIT(3) (4) 
(RO) ,R4 
RY 
R3 
R3 
RY 
6$ 
R3,2(R1) ;SET TCR BIT FOR LINE 
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DATA TABLES 








M7 Wwr0O-uM O-UM Tt WwrO-uM sw O-UM t-oO- RO-uwmrT MWK O—y 
we Sr Sort br Wt et at St ed bit wet Bab Pt MTS tn he pepe de piet SPT TNE Att tat peeth E M Lt td RAE HS Rinus 
Ot tt a a a UU UU CUCU CUCU FU CU UA Cua eu cu cununUundcucunucunurunsngeuns quay cucury 
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PS 
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>-2= > b — & + b— 0 9 b= b -~ 9 9 -- pp 
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b+ b= b+ b> ~ = bs Hh Hp HH — Hm 
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001272 
001274 

Bio7sa 
001302 
o000Ce 


001304 


. 050501 


001222 
000001 
001262 


ON@LINE EX 


001262 


in  €64 eS. Thene Dee eee 


‘daeteihes ” TRanentTs fie LASY Creates RECEIVED ON ITS RESPECTIVE 


: as! De URN AND LINE FEED ARE INSERT 
Beek SE Pos,” oetaentcitaaea teat, 
PROG2: RESET ;CLEAR OUT THE WORLD . 

MOV SICNT, SP ;RESET THE ae pvsyren 

BIS FIRST TABLE LEVEL 


MOV eXMTtAB, R1 NFER. 
Re OF TABLES (WORDS) 


MOV #1400, 
13: CLR (R1)+ : CLEAR THE TABLE 

DEC 

BNE .° 1S 

MOV #400, Re sLENGTH OF MASK/COUNT TABLE 
2S: INC IP MASK 

CLRB Os (R1)+ SCLEAR COUNT 

DEC Re 

BNE 


| Pe ee INTERRUPT vestonett S AND THEIR ISR’S: 


sBET UP DEVICE ADDRESSES IN LINKER ROUTINES 
;SET CSR’S EVERYTHING ENABLED 
:SET TCR’S, ALL LINES ENABLED 


PeINIT: CLR 
MO 


V DEVADR, RL 
MOV VECADR, Re 
MOV #R2SRO.R3 :SET UP POINTER TO LINKERS 
1S: MOV R3 (R2)+  ;SET UP RECEIVER INTERUPT VECTOR 
MOV RCVLVL, (Re)+ 
MP (R3)+,' (R3}# ;ADD 4 TO RB 
MOV Rl, (R3) ADDRESS OF CSR 
R00 iC, (R3)+  ;ADDRESS OF RBUF 
MOV R3 (R2)+  ;SET UP TRANSMITTER INTERUPT VECTOR 
MOV XMTLVL, (Re)+ 
CMP (R3)+," (R3)¢ 
MOV R1 (R3)+ ADDRESS OF CSR 
MOV #SOSO1, (Rl)+ SET UPC 
:BITO = RECEIVER ENABLE 
;BIT6 = RECEIVER INTERUPT ENABLE 
:BITS = TRANSMITTER SCAN ENABL 
;BITle = aratus 
*BITI4 = TRANSMITTER INTERUPT ENABLE 
TST (R1l)+ 
ASL sUNET a # 
MOV SVSWO(RO),(R1) ;SET TCR B T§ FO FOR R SELECTED LINES 
ASR RO sRESET UNI 
MOV #1 MARK  ;SET UP ae 
MOV (R3)+, RY :SET UP OFFSET TO TABLES 
:CHECK FOR LINE SELECTED 


4S: BIT MARK, (R11) 
5$ 















OCS it “OZDE RR. 


— CFRANANTT LAST CHARACTER RECEIVED)” eT HSH PAGE ON 


QodNdI0000 
0 ee 


oor 


82 
foe 
— UT 


Oo 
-_ 


Be issaddzassis 
Bree 


oo 
bm ome 
£O 
B= 


58 


SRR rege 


zr 


QOOOOCOCTWOOVIOVOOVOOOVOVAO0VB00000000 
<= 


4 bh b= bh Pe & = be 2 fe he eb hh Be Pee pe 8 Bo fh Ps Pe 
p+ bb 2b = bb hh P= he 


—-O0O 
B23 








MOV #MSGPe, alts pal ; T UP XMTR_TABLE 












MOV as XMTCNT (4 T UP COUNT 

TST R4}+ rhe OFFSET TO NEXT LINE 
. 

cH (RL)+, (RL)+ ;ADDY 

CMP RO, UNITS 

BNE 





1 
BIC #140, @8PS §$ ;LOWER PROCESSOR PRIORITY 
5 ESE RE SE SEEKE E EE EE EE ASE SE ESE SEA EEEE EAE a HE EEE SEE E E EE ek a a 
PROG2 FOREGROUND PROGRAM TO READ. WRITE MEMORY 











5 SERSAAAARALKAAAAARALELA SAL LELA LAS LALARLA RESALE RASERS AE LLES SHLAA LS FLARES 








FORPe: we #0000, 0 ;TOP OF 4K BANK OF MEMORY 
18: ADC -(RO) sPReT AD/WRITE TO MEMORY 
BNE 1$ ;RAPID T 
TST RO CHECK FOR LOC 0 
BNE 1$ BRANCH IF _MORE MEMORY 
BR FORPe ;LOOP FOR EVER! 









5 RERAAAERALALA LARA ALARA LEA AA LE LARA LA RALA RAR L REA AAL SELES ALRAESREL EASELS 


:PROG2 LINKERS TO DJ11 INTERRUPT SERVICE ROUTINES 
erttiit titi itt ttt itetrttiittrttttttitirtierteereterttrierrtt retest te 


ReSRO: JSR RISR 
WORD C1e001e+¢Oe10> >, <0#40> 
x2SRO: JSR RO, PexISR 

. WORD a +<0#10>>, <#4D> 
R2SR1: JSR 


2RISR 
. WORD cieogtee. 14100», <1#40> 
X2SR1: JSR 
(160020%<1#10>>, «1#40> 


ReSRe: JSR RO, PERISR 
‘ (100 1¢+. +(2%10>> , <2%40> 
X2SRe: JSR 

yagro <] 2410», <2#40> 
ReSR3: J RO, PeRISR 

. WORD (16001283410) >, (3#40> 
X2SR3: JSR RO, PexI 

. WORD LenGe08<3410>>, <3#40> 
ReSR4: JSR RO, P2RISR 






-WORD << 160012+<4"10>>, <4#4Q> 
X2SR4: JSR RO, PexISR 

. WORD eeobebs +<4#10>>, (4840) 
R2SRS: JSR RO, P2RISR 

WORD  <160012+<S#10>>, «S#4O> 


a 


¥ < 
X2SRS: JSR RO, PexISR 

.WORD <160020+<S#10>>, «S#4O> 
R2SR6: JSR RO. PERISR 

-WORD ¢160012+<6#10>>, <6#40> 





X2SR6: JSR RO, PeXISR 
.WORD << 1600eC * 6410», <6#40> 
R2SR7: JSR RO, P2RISR 
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DZDJBD.P11 SR LINKER 


ate -WORD ¢160012+<7#10>>,<7#40> 


hee X2SR7: R SR 
110 . al +(7%#10)>, <7#40) 
eatie R2SR10: JSR RO SR 

4 <160012+< 10#10>>, <10#40> 


X2SR1C: J 
160120 00400 F «160020+< 10%10>> , <10*40> 


004037 R2SR11: 
4 (160012+¢11#10>>, <11#40> 
X2SR11: SR 
160130 O00440 . WORD 160020911410)», (1140) 
AS ReSRle: SR 
1601 Booe . WORD at 124<12%10>>, <12#40> 
x2SRle: 
: «] +<«12%10>>, «12#40> 
R2SR13: RO 
‘ 160012+< 13*10>>, <13%40> 
X2SR13: 
? 0+<13*10>>, <13%40> 
R2SR14: 
: +<14%10>>, <14#40> 
X2SR14: 
: +<14#10>>, <14#40> 
R2SR1S: 
+¢15#1%>, <15#40> 
X2SR15: 
‘i +< 15#10>>, <15#40> 
R2ESR16: 
eee’ +<(16#10>>, <16%40> 
. WORD 60020+< 16#10>>, <16%40> 
R2SR17: RO, PeRISR 
” WORD 160012417410), ¢17%4O> 
X2SR1i7: RO, Pex 
(1600204+«17%10>>, <17#40> 
5 RELLAAAALALALALE LAL SEL LLLAL LEAS AE LAALALALAERERESAALAALREREER ELAR ELS RARE 


; TRANSMITTER INTERRUPT SERVICE ROUTINE 
Pertttiiiititrttiititiiti tii itttititti titi titi ieririsrece rere rored ss fo) 


PexISR: 
MOV 


pp b= Ph — bh mp» pe 


soma co 
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FRESH RHRADS 
moe 
£o 
z = 
a r 
—o-5 a-3 55558 oa 
D> BrS % 


= b= bb - h  H eR— - ed 
he 


z 
323 
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ae: 
$x 


v 
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fa 
aeas 


Bn 
Bee 


-_ 
o’ 
Oo 
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 vOU 
mw 
<e 
ot 
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x 
b-3-3- 

— — Om 


~ 
$2 


Se IITe EES SEES 


bb he bh = bb = bh bP bb bb bb = = bb = b= bb b= = = ph eh 
woe. 
a 


>= bbb & = b= b= + <b > = — b — b p  b p p 


; 
0 
5 
0 
0 
0 
0 
0 
0 
Q 
0 
0 
0 
0 
0 
0 
1] 
9 
0 
0 
0 
4] 
0 
0 
0 
0 
0 
0 


WwW 
m—r- 
£o 
3S 
<£ 
[| 


;PUSH R1 ON STACK 
PUSH R2 ON STACK 


i$: ;CHECK FOR TRANS READY 
;GET LINE NO. 


jon] oo] oe] 
pate 
moo 


58 
By 

| el 
yt 


;TST FOR ZERO 
T OUT 


:GET OU 
),8(R1);SEND A CHAR ACTER 
s COUNT CHARACTERS 
K FOR MESSAGE OR DATA 
1$§ ERANGH IF DATA 
XMTTAB(2) UPDATE TABLE POINTER 


OOONONOVOONVOO00O000 
$B Fo he Db fp — he bh bo ba be be he 
SEERA SSESRRSRER ES 












7 agama 
DZDJ 


BO.Pil 
1498 011374 000754 
1499 Ae 1g2 
1500 Q114 1430 
1 pt 1303 
1 114le 
1503 O11416 112762 
1504 ete 
1505 0114 1 
1506 Q1143e 161002 
1537 011434 906202 
1508 011436 005037 
1509 011442 300261 
1510 O11444 006137 
1511 911450 005302 
4512 011452 100374 
1513 O114S4 943761 
1S14 011462 0007el 
1515 011464 012762 
1516 Oll"7e lle 
1517 911500 00971 
1518 011502 : 
1519 O1150e 012602. 
1520 011504 Ql2e601 
1Se1 011506 012600 
1S2e 911510 occcde 
15e3 
1524 
1525 
1526 
1S27 
1528 011512 
1529 O1!Sie 010146 
1530 011514 010246 
1531 011516 O10346 
1532 0115e0 012001 
1533 011522 011102 
1534 0115e4% 100053 
1535 O115e6 032702 
1536 011S32 001402 
1537 011534 104002 
1538 
1539 
1540 
1541 
1542 
1543 011536 000771 
1544 
1545 1130 0 
1548 O1i54e 1 
ie flies tee 
ies GHES Wie 
1550 O01155e 136302 
1551 011556 00. ‘01 
1552 011560 104002 





070000 


es: 


001306 
003306 


Ss: 


oo0cd4 


001306 3$: 


003306 


4§: 


5 LEASSLALLALALALLAALA LEAS ELE LLELLALAAA HEEL ALAA LALLA ALAA REL LAAARERERA EELS S 


RECEIVE! 
Pertrtrrrti tit iitti ti iit iti t tt erereeriricierererr rere re bere gs os) 


: PROG2 


PeRISR: 


18: 


es: 
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TRANSMITTER ISR 
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1$ 
CNTTAB(2) 


;CHANGE FLAG 
H IF WAS DATA 

BRCVTAB, xITTAB( ae aes NTER TO RECEIVER TABLE 

872. XNTCN T(2) ;CuuNT We, CHARACTERS TO THE LINE 

RCVTAB(e2 s CHECK FOR A BREAK 

1§ H IF REAL DATA 

RO), R2 RECOVER LINE NUMBER 

MARK ;SET UP MARKER 

MARK ;MOVE MARKER 

R2 :COUNT LINES 

cs ; H IF MORE 

MARK, 4(R1) CLEAR TCR BIT 


g NUE 
#RETURN, XMTTAB(2) -: ;TYPE CARRIAGE RETURN, LINE FEED 


ae, "XMTCNT(2) : COUNTER OF 2 CHARACTERS 
(6)+,R2 sPOP STACK INTO R2 
(6)+,R1 :POP STACK INTO Ri 
(6)+°RO : POP STACK INTO RO 


R INTERRUPT SERVICE ROUTINE 


R1,-(6) PUSH R1 ON STACK 
=(6) USH RE ON ON N Sree 
-(6) PUSH A 
(D+ RL Boren 
75’ eo, NO CHAR PRESENT 
#70000, R2 ‘CHECK FOR ERRORS 
2s : BRANCH IF “pees 
*RECE 
sRISR 
Dies ae ERROR 
;BITLY 
1S : FORGET 7 The oe 
’ R3 ’ 
3 ;CLEAR THE DATA 
R3 ‘LINE ® TO LOW BYTE 
#2 : a ‘LINE # # 2, ALSC CLR CHAR PRESENT 
maskt3).Re ; CHECK Slacten LENGTH 


CHARACTER LENGTH ERROR 
;RI=RBUF ADDRESS 





MAINDEC-11-D2DJB-D-D 
Pll 
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pa Ps bo 
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seeaa gee 


ai Ad 
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Rie Ad 
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aaa 
OOOMHDONOONON0|N0N DBDOOOOCOO00000 


he bh bo bs fh b= ho bs Bo pe Hs bt Pe ph bh pe gs 


Recon seRe 


ba FH Boh oh > R= hs hs bs pe ee Pat b= bm bee b= b= Ps po pee 


uw 
an 


o 
wf 


002306 
002306 


001262 
001262 


001262 


OoNs0? 


015056 
00900e 
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;Re=CONTENTS OF RBUF (DATA) 
—- 3 CHECK 






DATA 
Re RoVTAR(3) -SAVE THE DATA 
(kd), RECOVER LINE NUMBER 
MARK ;SET UP MARKER 
MARK UPDATE MARKE 
R3 LINE’ 


: S 
4$ ;BRANCH IF MORE 
MARK, e@(R1) ;SET TCR BIT 

1$ CONTINUE 


a Ss esate” oi SVE. THE Dara. 


RETURN:  ercaaceh sT ARRIAGE RETURN, LINE FEED 
#2, ‘XMTCNT(3) : i MESGAGE LENGTH 






1$ 

(6)+ 97 ;POP STACK INTO R3 
(6)4, 0.0 :POP STACK INTO Re 
(£)+,R1 :POP STACK INTO Ri 
(6)+,R0 :POP STACK INTO RO 





MAINDEC- | tome oo 
DZDJBD.P11 


1579 

1$80 

1581 

IE ise po 
1584 011666 

io i so 
ie Sse fee 
ae tie Wee 
1590 011714 S02 
12a They 001375 
Bs tie Hee 
1594 Oll72e6 105021 
19S 011730 005302 
1896 011732 001374 
1597 011734 013700 
1598 011740 006200 
1599 011742 040037 
1600 011746 20 
160] 911750 001374 
1803 911752 013737 
1603 911760 005337 
1604 911764 012705 
1605 011770 063705 
1606 011774 043705 
1697 

1608 

1699 

1610 

1611 

l6le 

1613 

1614 012000 005000 
1615 Qle00e 013701 
1616 012006 013702 
1617 OleOle 012703 
1618 012016 9010322 
1619 Ql2e0e0 913722 
1620 Ole024 22323 
1621 OQle0e6 010113 
l6ee 012030 062723 
1623 012034 005723 
1624 012036 0103e2 
16eS 012040 phs/ Se 
1626 012044 Oee3e 

i627 012046 010123 
1628 012050 Ole7el 
1629 

1630 

1631 


1632 012054 005721 
1633 012056 006300 
1634 912060 Oi6011 
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ECHO EXERCISER 


001222 


177776 


001266 


53H HHH HEH HHH HHI HHH OH aa: 


; AM 3: ECHO EXERCISE 
ttt itiiitiiiiitititiititttiitiiiiiitit litt iiti titi etsecerateetttiiey 


PROG3: RESET RESET QUT THE WORLD 

ee ss aoe PROFESSOR 70 STACK POINTER 

Foy anvtea, RZ FinsY PRELE POINTER” 

MOV #1400, Re NGTH_OF TABLES (WORDS) 
18: CLR (R1)+ fea THE TABLE 

DEC Re 

BNE 1$ 

MOV #400,R2 ;LENGTH OF MASK/COUNT TABLE 
2s: INC Ri :SKIP_MASK 

CLRB (R1)+ CLEAR COUNT 

DEC Re 

BNE es 

potas prsiz, RO ;DUP BUFSIZ 


AS 
BUFNIT: BIC RO, BUFSIZ ;CLEAR ALL BUT MSB OF BUFSIZ 
ASR R MASK ALL LOW ORDER BITS 


BNE BUFNIT 
MOV BUFSIZ, BUFMSK ;SET UP BUFMSK 
BUFMSK 


DEC 
BoD OUBURMK, RESP TT SN ASBOUNDORY™ 
BIC Bunk. Re 
sROUTINE TO INITIALIZE ALL DJ11°S AND THEIR ISR'S 
:SET UP ALL INTERRUPT VECT 
>SET UP DEVICE SSES IN LINKER ROUTINES 
*SET CSR’S EVEFYTHI 
-SET TCR’S, ALL LI 
P3INIT: CLR 
DEVADR, R1 
MOV VECADR, Re 
MOV #R3SRO,R3 ;SET UP POINTER TO LINKERS 
1S: MOV R3 (R2)+  ;SET UP RECEIVER INTERUPT VECTOR 
MOV RCVLVL, (Re)+ 
CMP (R3)+, (R3)+ ;ADD 4 TO R3 
MOV Rl, (R3) ADDRESS OF CSR 
ROD e. (R3)+ ADDRESS OF RBUF 
MOV R3 (R2)+  ;SET UP TRANSMITTER T 
MOV -XMTLVL, (RB)+ INTERUPT VECTOR 
CMP (R3)+, (R3)+ 
MOV R (R3)+  ;ADDRESS off CSR 
MOV O00, (Rl)+ ;SET RANSNITTER ONLY 
‘BITS = CORACHT TIEN: S CAN ENABLE 
sB1T12 = TATUS ENABL PE 
*BIT14 = TRANSMITTER INTERUPT ENABLE 
TST (R1)+ 
ASL sUNIT # # 2 
MOV SVSWO(RO),(R1) :SET TCR BITS FOR SELECTED LINES 





MAINDEC-11 
DZDJBD.P11 
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ODOK00O000000 [0D 
Bo! eof 


tururufrorufrufurufr 
02 0 bb bh pe pe 


FEHSRENSPSESRAD 


ONO OONVOVOO0000000 


8 ee 
rururururufrururorfufrururururorury 


Os bas b= b= pb ps Bs b2 Pb -  = h fs fs pes ee 


FPFOFLRSEVE 


rorurorere 
orco 


iS 


ONON0COON0000 
ZR 


Re on 
Soe 2 


ny 
ee 


OO000CRDD00 
rm 
mM 
3 
Oo 


NSE TOE 





neues” 
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000001 O0l2be 


001262 
001306 
002306 
001264 
015337 


001262 


001270 
000140 


001306 
000400 


oo000e 


Bo0i01 
000010 


020000 


es: 


3s: 


4$: 
S$: 


6S: 


*PROG3 FOREGROUND PR STAR 
sSSAEMERSEESESEESERESADEERESUEESSENSESEOO ERE bENETOEEeTESeSTEOtOrS TinERE 
#XMTTAB, RI 
(R1)’ 

1$ 

Re 


FORP3: 


18: 


es: 


MEMX3: 


1S: 


Re, fe 

GP3, R 
(R3)+, 
g 


#140, 
SEROG] FOREGROUND PROGRAM TO STPRT RECEIVERS TEN Dencie: eon 


1$ 

UNITS 
DEVAD' 
#101, 


MACY11 27(732) 21-SEP-76 13:54 PAGE 39 


;TOP OF 4K BANK OF MEMORY 






T_UN ER 
me ak aL 
buat Be Oh 
; CHECK FOR. tee SELECTED 


iS iB er ie 
: 1 UP ¢O ORE 


be ROVE FESEAGE a ae: 


; COUNT BUEFER SIZE 





? BRANCH FD 
*CLEAR REST OF BUFFER 
*COUNT BUFFER SIZE 
*BRANCH IF MORE 

INC OFFSET TO NEXT LINE 





;POP STACK INTO R3 
sPOP § STACK INTO Re 





;LOWER PROCESSOR PRIORITY 












T RECEIVERS, THEN EXERCISE MEMORY. 





;CHECK FOR a TABLE CLR 


: H 

’ 

;GO TO er LINE ENTRY 
;COUNT L 

sBRANCH IF MORE LINES 
;SET UP UNIT C 

; E ADDRESS porns 













rune 00 
4 
—O 
a 
~< 
4 
oOo 
=) 
a 
ee 


: COUNT DJ11’S 


sFAST MeO AAITE TO MEMORY 


t CHECK FOR LOC 0 
BRANCH IF MORE MEMCRY 
;LOOP FOR EVER! 
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OZDIBD.P11 ISR LINKERS 

1691 

1632 5 RELHKKALSKLERLERS LEEK LESS SELLE SEEM ERRSER EERE AREER ELL LEE REELS ES SES ASE SY 
1633 *PROG3 LINKERS TO DJ11 INTERRUPT SERVICE ROUTINES 
iE4s ; SRERSRSLHR ELLER ELLA KESSLER K ESE RSLEL EL ES REARS EEE BRA LAER REEL FES REE EEL EE RSLS 
teas TESTE ptana0 a yr Mena aecoRi0> > <0#40> 
tea pisshq ABORaS else X3SRO: a pole : 

1699 12310 1e00e0 bo9009 anes gre <160020%<0%10> >, <O#40> 
1701 pigaie Teopse en -WORD « <1600124<1#10>>, <1*40> 
1702 012324 504037 012674 X3SRI: JSR RO, P3XISR 

1703 012330 160030 oO0040 LWORD << 1600204<1%10>>, «1#40> 
1704 12334 004037 013024 R3SRe: JSR RO, P3RISR 

1 12340 1s003e 190 . WORD 16001642410) >, <2HH0> 
1706 012344 037? 012674 X3SRe: JSR RO, P3X 

1707 Ole3S50 160040 000100 .WORD <160020+<2%10>>, <2*40> 
1708 012354 004037 013024 R3SR3: JSR RO, P3RISR 

ip Glee inte iat asna, FER muebaggenlO OD) 
1711 ts j 140 ‘ Mab acOs KIO >, <3#4O> 
1712 012374 004937 013024 R3SR4: JSR RO, P3RI 

1713 012400 160052 o00200 LWORD © ¢ 160024+<4#10) >, <4#40> 
1714 012404 004937 012674 X3SR4: JSR RO, P3XI 

1715 012410 16 00 . WORD C1E00E04 (4410) >, <4#HO) 
1716 012414 aie 1 R3SRS: JSR RO, PSR 

1717 Ole420 160062 O00e40 ~ WORD <1600124<5#10>>, <S#40) 
1718 012424 O04 012674 X3SK5: JSR RO, P3XI 

1719 012430 1600 40 . WORD C1600 0+<S#10>>, <S*40> 
1720 012434 013024 R3SR6: JSR R I 

1721 012440 160072 000300 “WORD <160012+<6#10>>, <6#40> 
1722 0120444 O04 012674 | X3SR6: JSR RO, P3XI 

1723 O1e4s0 460100 000300 f <«160020+<6#10>>, <6%40> 
1724 012454 004037 013024 R3SR7: JSR RO, P3RISR 

1725 012460 160108 40 . <1600124<7#10>> , <7#40> 
1726 DieHb4 004037 012674 X3SR7: JSR RO, P3XISR 

1727 010470 160110 O00340 -WORD <1 +<7#10>> , <7%40) 
1728 012474 004037 013024 R3SR10: JSR RO, P3RISR 

1729 012500 ieO11 000400 < (160012+< 10%10>>, <10#40> 
1730 b1e504 12674 X3SR10: JSR RO, P3XISR 

1731 O12e51C 1601 00 . WORD Pehasoe 10e10>>, <10840> 
1732 012514 fO4 013024 R3SR11: JSR RO, P3RI 

1733 012520 i6o0le2 ooo44e 4 (160012+<11#10>>, <11#40> 
1734 012524 004 012674 X3SR11: JSR RO, P3X 

1735 012530 160130 O00440 LWORD <1600204<11#10>>, <11#40> 
1736 O1e534 013024 R3SR12: JSR 4p of Sel 
17 eat wea X3SR12: tore RO pot SR , 

1739 012550 160140 000500 “WORD <1600204< 12%10>>, <12%40> 
1740 012554 004037 013024 R3SR13: JSR 

1741 b:e560 Abo14e po0s40 “WORD ¢1600124<13#10>>, <13#40> 
1742 012564 12674 X3SR13: JSR RO, P3XISR 

1743 012570 1601 40 «WORD a <(13%10>> , ¢13%402 
1744 «012574 037 Ol R3SR14: JSR P3RISR 

1745 012600 1601Se 000600 -WORD << 1600124+<14#10>>, <14840> 
1746 012604 O04037 012674 «© X3SR14: JSR RO, P3XISR 





‘2 


$ 


19 
14 


a 


if 


furanat 
Vie zt 


della 
eb 


titur- eo 


= ee ie 


Fine 


Bat Ze 


~) 


e 


aide 


ie 
? 


aide 
futu 
vaeeeaed 
et 
fe 


za 


~~ 
£0 
futyrarary 
wt a} wr cr 
ane 
“ye 
Sats 


RRee 


RACER 


4 


tu 


PER ER 


OOONYOMNYOOYVOOVYIOOVGOVOOMOUIYOVIOIVIOONCHIVVHOVOND 


o— 0 0 -- & = 9 9 -<  ~ b-- b= 9 9-2 & ~~ 6 -< 6 & ~ & * Bb 9 &- 8 6-0 + Oo hh pe he 


OD 


ws 


8 


oO 
oe 


: 


00 40-0 +020 -+ > © b- < 0 <> = 0-0-8 2 -< 2 0-9-0 +h 0p am 0m 


39~9°-9~9-9~9~9 


SEE 


Shih 

thet Witsoe Tar Prat Pu 
rurururururufun ifrururu 
aad 


o-- 


Sr eaSORE 


isisisits 


Gt 


ono 


2000 
© 
Wo 
or 
<£ 
oO 


001264 
021306 


001306 


ococo4 
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WORD < 1600204¢ 14#10>>, «14"40> 
R3SRIS: JSR & 
LWORD = (1800124 15#10>>, « 15#40> 
X3SR15: JSR X 
«WORD 6Q0E0%< 1S#10)>, :1S#40> 

R3SRib: JSR eR 
.WORD — ¢ 1600124< 16810) >, « 16#40) 
N3SR1é: SSR - RO, P3XISR 
 sWORD  1600204« 16810>>, <16#40> 
R3SR17: JSR —- RO, P3RISR 

_ WORD =< 160012417810», «17940, 
WORD = < 1600204 17810>>,<17#40> 
 RSRAARAAERSSSSSSSSSSSSFSASSHRSSSLERSSSSLSSERSSAREALSL S44 S444454529~+4554444 


:PROG3 TRANSMITTER INTERRUPT SERVICE ROUTINE 
RPP RDEEREERERSERGERRSPESEERRARESREREEREESEERES RE EEEEEEEEE EEE EEE EES EEES 


PSXISR: 


MOV R1,-(6) ;PUSH R1 ON STACK 
MOV Re’ -(5) :PUSH Re ON STACK 
MOV (ROI+ Ri} 
18: TST (RL) :CHECK FOR TRANS READY 
BEL 4g 
MOVE  ?(R1),R2 :GET LINE NO. 
ASL Re 
ADD (RO), Re 
MOV XMT TAB ( 3}. BCR) :SEND A CHARACTER 
C XMTTAB( TABL TER USE 
INC XMTTABL2 °U re TE TABLE POINTER 
BIT BUFMSK, XMTTAB(2! ; CHEC K FOR END OF SUFFER 


§ -B BNc 2 ed NOT 
Sus BUF SIZ XMTTAB(2) QuNG SUFFER 
Ss: TST8 490s AXMT TOG Le) a CHARACTER 

1$ : BRANCH bs ‘MORE DATA 


BNE 
2g OV R3,-(SP 
cu XMT TABLE) ;CLEAR TABLE POINTER 
Sus (RO) Re 
ASR 
CLR R3 
SEC 
33: ROL R3 
DEC R> 
L 3$ 
Bic R3,4{R1) ;CLEAR TCR BIT FOR LINE 
MOV (SP) +, R3 :RESTO ha 
~ ge 1§ 
MOV (6)+,R2 ;POP STACK INTO R2 
MOV (6)+-R1 :POP STACK INTO RI 
Hoy (6)+°RO :POP STACK INTO RO 


sSELFSELLESELLEFLEAEASLARAAALLLASSLARALELLARSRARATAERPRERAERARAVAVRARVURA 


:PROG3 RECEIVER INTIRRUPT SERVICE ROUTINE 
[RERELEPSRRPRRERE RHE PREFAAARRARRRREESAARARPAR EA RARATARALTATAATATTAATE 














DrOIEO.Pil 








aes 
1805 5i3tse 
1807 913030 
1808 013022 
180 913034 
1810 013036 
18 13039 
iid 91304 
18i3 513046 
1914 6139s0 
i815 
1816 
1817 
i818 
18:5 
i820 913052 
sei 013054 
i822 13056 
1822 913960 
1824 O130be 
1825 013064 
1828 013066 
1827 913072 
igee 813074 
i823 
2830 
183: 013076 
1832 013102 
1833 013104 
lE34 
1835 
1236 013106 
1837 O13110 
7893S 513115 
T5535 (Si3ile 
3645 
isi 
1g42 
843 
ies 
AS 
| iesg 
| Bu? 912120 
| 84g 
i643 13124 
| Ber O1313e 
as HS 
} rs evs 
, 1854 Bisies 
| 1855 013152 
1856 013159 
| i867 313162 
\ 2 Ee 3:2170 
| 
| 


MAINDES-11-02058-0-0 


“J 


C2 O0N0NO0ND 


t=] 
S 


oroccee 


00230& 


CC230€ 


O11666 
001306 


002306 
Q01e6& 002306 
001264 002306 


OC1266 902206 
00230 001306 


P3RISR: 


1$: 


2$: 


3$: 


4$: 


sNOTE: 


ts: 


RCISER AND ON-LINE TESTS 


IF 


“BUFSIZ™ MUST BE A MUL 
INCREASING 

IMP PRO 

TST XMTTAB(Y) 

BEQ 

MOVE ORCV TAB) 
INC RCVT 

BIT 

BNE 

Sus 

ta 

BIC BUFMSK, RCVTABC4) 
MOV RCVTABLY), XMTTABLAS 








8$ 
#70000, Re 
2s 


RO) RY 
maSK!4) ,Re 
3$ 


ROVTAB(4Y) 
4§ 


1$ 
ARCVTAB (4) 
5$ 


HE ABOVE ERROR WAS DUE TO 
THE PR 


MACYI1 27(732) 


PLE OF 
it MAY CAUSE THE BUF 


sPUT The Data INT 
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; PUSH R1 ON STACK 


ERRORS — 


;RE=sCONTENTS OF RSUF 

BITLE=PARITY y ERR 

;BIT13=F RR 

SBITI=UART “OVERRUN 

KIP_BAD DATA 
+ 


LEAR THE DATA 
INE ® TO_LOW BYTE “ 
INE 8 # 2, ALSO CLR CHAR PRESEN’ 

AOD OFFSET 

:CHECK CHARACTER LENGTH 


CHARACTER LENGTH ERROR 
R1=RBUF ADDRESS 


:RO=CONT ENTS OF RBUF(DRTA 
; CHECK a fe UNSELECTED LINE 


:RECEIVED DATA ON UNSELECTED LINE 


Q 

CHECK FOR DATA BUFFER FUL 

ial R OVERFLOW 
aie fa RSnTT R DRoeL EN 

‘2 0 CONTENTS OF 

9 Sven INCREASING THE CONTENTS 


ERS TO OVERFLOW 4K. 
RESTART ON THIS TYPE ERROR 


;CHECK FOR aes NN ACTIVE 
NACTIVE 


HIF 
THE BUFFER 
;UPDATE POINTER TO NEXT irene 


ARCH 
BUFMSK, Revragiad -CHECK FOR END 0 OF BUF 


1 H IF NO 
BUFSIZ, RevTagc4i ;RAP ARROUND BUFFER 


;RESET TABLE POINTER 















04 
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Dzo780.Pi1 SEIVER I 

1859 013176 110274 002306 . MUVB = R2,_- ARCVTAB(4) 

18689 O13202 161004 SUB (RO), RY 

1881 013204 4 ASR RY 

1882 013208 005003 CLR R3 

1863 013210 O00261 SEC 

1854 613212 608103 7S: ROL R3 

1965 bi3el4 005304 DEC ae 

1865 013216 100375 BPL 7g 

1867 Ol322e0 955361 oogd0e2 BIS R3,¢°R1) :SET TCR BIT FOR LINE 
1868 913224 SCO? BR 1$ 

1389 7 3826 9$: 

i3: 132236 312604 MOV (6)+,R4 sPOP STACK INTO R4 
1§71 013230 012603 MOV (6)4,R3 : POP STACK INTO R3 
isc 13232 912602 MOV (6)+,Re :POP STACK INTO Re 
1873 813234 o1 MOV (6)+.R1 :POP STACK INTO R1 
igv74 21323 322600 MOV (6)4,R0 ;POP STACK INTO RO 
tg7s 01388 4880353. "OTT | 





———~- --- ee = - a me = 
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MAINDEC-11-D20J8-D-D 
OZDJB0. BELL AND SCOPE ROUTINE 


“ 


apReERes 


QOo0000 2000 
b= pee 


f¢ «] 
BBB 
oO 
hee Oe paw 
& Boiss 
mM HH 
£ oO’ £ryu 


SP fe 


w 
Fr 


snee # 
i 


O200 OO DOOOOOOOOVOVOVOVOVOOOOD00OO0O 


a a oe b= Pepbaset cap teatninintainint ata 


ag 
tu 


0.0000 0.0000 
0b 0 8 = 
00 NOU £UTUeHC 


si igRRsnes 


2 


BERS 
® 


R 


0+ > <> = 6 <b b— © ~ 6 b&b -* 0  - & = & -2 —* &  h— §—2 & + §- = ~~ > hh - & <b Hh Pf Ho 0--b— 9 ph 
at tt oT} 
S.bep 
da 


iS 












DONE: 






aan At PCNT+ “mene 170 TH OUNT 
ape sie ae ul OOUE LE prea k 
BIT #SW10, ISWR 
BNE 4§ 
TYPE  ,BELL Ake THE BELL 
TYPE 177 TYPE Q FILLER FOR 11/05 
4$: MOV d#42, RO GET MONITOR ADDRESS 
BEQ 3$ IF NONE 
RESET RESET AND 
SENDAD =. 
JSR 7. (0) GO TO MONITOR 
NOP SAVE ROOM 
NOP ; 
NOP ACTLI 
3¢: JMP RESTAR : RETURN 
.TBIT: O :T BIT FLAG 
: SHLT ERROR TYPEOUT HANDLER 


3 THIS ROUTING Pag Git our ERROR aes grt WITH THE 
T ALSO COUNTS THE NUMBER OF ERRORS 
SAND Hae THE CAPABILITY’ OF LOOPING ON ERROR ain ON anon 





;"HALT™ ON ERROR, AND INHIBIT TYPEOUTS. AN OPTIONAL ARGUEMENT 
>(HLT+3) WILL BE PLACED IN “HLTCT$:" FOR ADITIONAL rYPEMTS. 

EMTS: JSR KBDINT 

BIT cd 0, aSWR ;BELL ON ERROR? 

Q ine - SKIP 
YPE :RING BELL 

1S: INC ERRORS COUNT THE NUMBER OF ERRORS 

BAe 53" ; ‘ek tp TNPEQUTS 

move LEDS HLTAOR DUT ABORESS GF INSTRUCTION ON SASK 

SUB #2, ALTADR FUDGE. E BODRE SS 

nove ER HLTCTS 36 GET Loa 

1h PRIATR Tipe ta! nocTa 

PF ERRORS To. USER ERROR ROUTINE 

2s: tera ‘at USERRDR 

BPL +4 :SKIP Ir CONTINUE 

HALT :HALT ON ERROR! 

ISR PC .KBDINT 

RTI ah 
HLTCTS: ‘aT nH 
HLTADR: ST i SE ATRUCTION EXECUTED 
ERRORS: BIC 87700, 2$ 
i$: DECB. sd TCT$ 

BMI 3$ 

ADD #100, 2% 


he EXERCISER AND oneb TESTS MACYL1 27(732) 21-SEP-76 13:54 PAGE 4E 


ROUTINE (ERROR TYPEOUT) 

28: MOV “0, TTY ; TYPE REGISTER X IN OCTAL 
914064 JSR %? PRINTR 
015064 IYPE, SPACE 


1$ 
38: RTS PC 





tee nee + +e ee ee ee 








NAINDEC-11-02058-D-D 


DZDJBD.P11 


1937 
wed 
ee 


Be 


rp te 


133 Bt 
Ise O1geHe 
tayo Biaedé 
1948 013554 
ea flee 
tge0 Bi zebe 
1962 013570 
is Hee 
1985 013600 
1955 013604 
1957 013610 
1965 13612 
1959 013614 
tay Bi 325 
1365 Bt 
taps Bt 3eSe 
1965 013630 
1966 013634 
1967 013636 
1968 13540 
isra Siaese 
4 

tary OL Sees 
1972 013654 
i973 913662 
1974 

1975 013664 
Dae 
i378 Cl se70 
taee $3840 
1361 13700 
1255 Btaon8 
ige4 Oly7i4 
tgee Bt354 
1987 013726 
is tlie 
idea Bt 
1991 013746 
1992 913750 


fia 


Borer 
ar tet et ate 8 


Se 


rnin 
fe 


ae 


an & 


000015 
90000 


014704 


C136E4 


177776 


BHA REAR ANP GRIME TESTS 
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; SUBROUTINE TO SAVE INPUT AS OCTAL NUMBER 


Ragcas RPRP ‘014012 READIN: NOy 
005037 014012 CLR 


18: 


PSTEMF 


4§: 


3S: 





, INHRE 
i READS  :GO READ TTY UNTIL CR 
INiRE ) H R1 ON STACK 
RS' = ‘Buen ne an Taek 
R3, -(6) PUSH R3 ON STACK 
(RS)+, RI 
#20, CAT : 
# INPUT, Re : 
#120, (Re) :CHECK FOR “P™ 
#1) 
(R2)+,R3 
Ry. els 
on sBRANCH WHEN DONE 
8177770,R3 
33 :BRANCH IF BAD DATA 
(R1) 
2s 
(R1) 
ak 
(R1) 
2s 
R3, (RL) 
iy 
;MAKE SURE 2-BIT IS CLR 
aePS, PSTEMP :SAVE CONDITION CODES 
(6)+,R3 :POP STACK INTO R3 
(6)+°R2 :POP STACK INTO Re 
(6)+' RI :POP STACK INTO Ri 
PST . “RESTORE CONDITION CODES 
TEMPORARY STORAGE FOR PS 
R3,-(6) : R3 
sINPUT -GET ADDRESS 
sINPUTS ,R3 «BUFFER FULL? 
; Ss -~ TYPE one 
38177560 WAIT FOR 
38177562, (3) ‘Get C TER 
#200, (3) :GET RID OF JUNK 
8177, (3) 21S i A RUBOUT 
4 3SKI IF i 
#25, (3) 
3$ 
.+2 


$ 
(3),. TYPE 


3.ASCIZ "9"<15><12>"= * 
;ZAP THE BUFFER AND LOOP 
;SET UP FOR TYPING 








Piaiageee 


° 
S5 S86 
> oe a 
+f 0 





ot sr eae 
ap0o04 24 
ists 


= 


CARER AND ON-LINE TESTS 


; ECHO 


LOBE 


IT 


K FOR RE 


IF NOT 
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RETURN 


;ZAP RETURN (THE 15) 


J 


heed "= 
; RETURN 


;TTY INPUT AREA 








MAT 


2006 
2097 


2010 


C=11-020J8-D-0 
DZDJBD.P 11 


eee 


— 
po 
SS 


Bay 


4 


—r~ 
Ae 


rm 


Jb i bm he 


ARERR ROR 
TERED 


ee 


KoRRe 
BASSE 


Sti 
4 


a 


DOODONBONBOVOVOVVOVVOO00000 
~ 


Oo 
Tee 
ToiurD 
rb 
ro 


SH ES 


170101 
000001 


Ol42ee2 
177772 


014224 


000100 


1422 
142, 


00C069 
014223 
014224 
003080 
014224 
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A ne It TESTS 


OCTAL TYPEOUT ROUTINE 


A CHARAETERSS Su UPPRESS LEADING ZEROES 
HE 6 BITS. IT tS CALLED VIA THE D 


N THE TTY. IT W 
R — AN 18 BIT ADD 
AUN , DUMPIS8, OR BITYPE MACRO’S. 


Rou BIT FLAG ans 16. CHARACTER COUNT 
BIT FORM 

secs LEADING ZERO’S 

Se 

a an FIRS! Ae ‘gee ASCII CHAR. 

aya OF ee TER 


ROTATE BIT INTO ¢ 
;PACK IT 

ROTAT BIT Into ¢ 
ROTATE BIT INTO C 


: SKIP 
; MAKE ANTS ASCII CHAR 
‘ANS COUN 


‘ [ib 


ee SWITCH, AND OUTPUT SUFFER 









MATNOEC-11-D20I8-D-0 
O2DJBD.Pil 








2047 014246 pp a 
se HSE bite 
2059 Bibs pie 
Sets: 
2053 Ae Stee 
Se tise Hie 
ee ANT Be 
2058 

2059 O143i2 913706 
2060 Bitte peeoat 
Se HN ee 
2063 014324 
cae 





Benes 






Rin 
oOo oo 
em i pa 
oom a1 
Qdoo00000 


a os 






2068 014336 

5p83 Bie 5535 
5071 014354 OCO0D4 
072 014370 000137 
Soa o14g74 

207s Bidsce  BODTTE 
5077 O14400 900000 
S078 O144o2 ocg024 
5579 

5590 








DJ11 
PO 


WER DOWN AND UP ROUTINES 


014374 
000340 


014400 
014312 


014400 


000026 


000126 POCOWNS: MOV 
000122 


000072 


ponte? 
000026 


MOV 


PUPS: 
1$: NC 


JMP 
ILLUP: HALT 
BR 


.SAVRS: 0 
PUVECS: 24,26 


RTI 





YESRT: 


EXERCISER AND ON-LINE TESTS 


PRON ON ON ON TI 
OOOO m-—-— 


J 
MACY11 27(732) 


- 





;SET FOR FAST UP 
; "RO ON STACK 


wean 
Fi Tat = i 


ee 


SSSSVEER EME 


Se 


0 Ce Stee ee eewe SCewe wee ee 


2m 


4 


IMP TO 


; THE POWER UP SEQUENCE WAS STARTED 
; BEFORE THE POWER DOWN WAS COMPLETE 


;PUT THE SP HERE 
;POWER UP VECTOR 





;RETURN FROM TRACE TRAP 
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UP THE POWER DOWN VECTOR 
;-ASCIZ <15><12>"POWER™ 
USER ADDRESS 





Oy el Pat EXERCISER AND ON-LINE TESTS 
OZDJBO.P11 OT HANDLER 


ste 
SES 
oO £ 


£ 
tu 


SERENE 


;THIS ROUTINE IS 
:CALL CAN BE IN 
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Pg ge Se aor a ete a ennai 
CT HANDL RENT ROUT is TQ OBITS 8 ALSE 


T OR T 
ss eucecsececessateneeseseseetensSbbSGOSSSSSGSeEOOSESESSSASEASIAGHIHA0004 
#1000, (SP) 5 Cre CK +. ADDRESS 
Sy $ ue! COMMAND 
(SP) eer VECTOR <SS 


TYPE MESSAGE 
allot INTERUPT TO ™ 


(SP)+. TTY sTYPE (SP)+ IN OCTAL 

PC, PRINTS AND SUPRESS LEADING ZERO’S 
(SP)+ ;POP STACK 

ee > TYPE MESSAGE 

* FROM ” 

(SP). TTY sTYPE (SP) IN OCTAL 

PC, PRINTS ?AND SUPRESS LEADING ZERO’S 


;FATAL ERROR 
;CONTINUE IF DESIRED 
MESSAGE TYPEOUT ROUTINE 
bet 2°, TO es gScit ) SFYBe fom ON vivre TTY. nen 
FORMS: 


; THE ASC 
;THE MESSAGE UIHice IS INLINE ASCII. 


di 





rururorunorerun rrr ror roruroronrrurororururrurururororurururfurururn 
ee es he be be bn be be ee bo be 0 bs 2 be 0s 2 he 0 be ho bo b= 90 fn be be he pe 


QRRESRESSBVRRPORE Selon coMm- SSBVRREBRES 


i tetesntatetsininimictotatatatataatat aia 
- 
REFERER ERs Temeees 


; MESSAGE STARTING IN oberon sooR:« arr - THe es 
) “PRINT cca) 12y MESSAGE) - TYOES 

. TTY, -(6) ;SAVE T 

a2(6), TTY :GET abgRESS TO BE TYPED 

#177400, TTY 15 IT A TYPEM? 
. TYPE IGET THE CHARACTER 

a TYPE TTY “FUDGE THE ADDRESS 

(TTY) : TERMINATOR? 

g - 3GET OUT IF 

(TTY)+,98177566 ;LOAD AND T Pe THE CHARACTER 
28177564 ?1S THE PRINTER READY 

4 sWAIT UNTIL. He IS 

1$ *GET THe NEXT CHARACTER 

3 6) -(6) :GET ss T 

#2, 4(6) ADD : TO 

(Ss, 2(6) iS IT .+2? 

#2, TTY 5ADD 2 TO THE ADD 

a TTY ; CK UP TO AN °D AN EVEN BYTE 
TTY,2(6) : 

(6)4, TTY >RESTORE T we 





8 
S 


oo 
— 


Oo 
_ 


SOOSSEIRRESH LSI Vota ZINA SoUE RCO SOOO SSGRREGEL SSS | 
WECBSR 20 
cee Reese 
adaees 8bbdd 


rurururufrurururorurorurororufrrururufurururuforururufrururururufurorururufrurururfururururururururururururururururu 
ee ee ee ee ee ae ee ae ee ae he Be be be en hn be bs Be he be me fe bo ho fo bo fe fo Fe bo bo 0 bo hb -2 bo = bo hp he Be he 
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TYPE ROUTINE 


000176 
CO, 


Tha 


000176 
000174 
000004 


001210 





.. TYPE: O 


’ TLU: CMP 


KBDINT: 


JSR 
1S: BIS 
TMP1: O 


-ASCIZ 


ei AE 
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;CHARACTER TYPE LOCATION 


G, SWR 


; TYPE SWREG IN OCTAL 


WREQ 
SWREG, TTY 
TYPE LEADING ZERO’S 


PC, PRINTR 
C Pal 
RS. READIN 


615) «12> <377><377><377> 


€15><12><377>"MAINDEC-11-D2DJB-D ODJ11 EXERCISER” 
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sana 


COOOo000 

0 0 0 0 0 0 0 0 0 0 oe 
WITT ¢ wn 
ZESHERRISS 


BORSS 


PRS IF 


28 


QOAVWIOOOVOOOVOOVOOOVWO0O000000 
we 
Tw 


i bb b= ps pp b= = b= Fs bh pe 


=e tt 
B R2eSRs 


041112 
042040 


oi 


—— O17 
pa 
Sine wou 


052517 
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MSGADR: .ASCIZ <15><12>"FIRST DJi1 ADDRESS: ™ 






MSGVEC: .ASCIZ <15><12>"VECTOR ADDRESS: ™ 





MSGNUM: .ASCIZ <15><12>"NO, OF DJ11’S: ™ 


MSGPRG: .ASCIZ <15><12)"PROGRAM #: ™ 
MSGO1: .ASCIZ <15><12>"NO DJ11’S!" 


MSGPe: .ASCIZ <15><«12>"PROG2: CONTINUOUS ECHO EXERCISER™<15><12> 





MSGP3: .ASCIZ <15><12>"*#ECHO TEST#"<15><12> 






.EVEN 
END: 


: 0 
END 
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ADRNIT 007714 82e 823 1020 1021 10458 








Sg posses 493 8 
LL = pee 4598 1882 1907 
BINAR ni feo ip} 10618 
BITYP§ O14CS4 . 01 
BITO = 000001 4608 
BIT! = 000002 4618 
BIT1O0 = 002000 4708 
BITi1 = 004000 4718 
Bitié = 0100 Ni 
BIT13 = 4738 643 
BITI4 = 4748 
BITIS = 100000 4758 
BITe = O00004 4628 800 
BIT3 = 000010 4638 
BIT4Y = 000020 4648 667 807 
Rig | & 
i T7 = ue % 
BITS = O00400 4688 724 
BITS = 001000 4698 7 
BUFMSK O01266 Se7# 602% 1603% £1605 1606 1777 1853 1857 
BUENIT 11742 18998 1 ot 
RFs Z is6} * ] is * ip 2 1644 1779 1855S 
NT $5 1947 oe 14 1548 
CNTLU O1462e4 21408 2148 2183 
CNTNIT 007716 824 82S 1022 1023 10468 
CNTTAB= 004307 SSOe  8cb% 84. 849 1009 1015* 1495 1499% 1569 
VADR 001272 5308 608 64 664 683 784 1389 16 1677 
DISPLA OO0lel2 SO4e 2170# 
DISPRE 000174 489% 170 
DIMAP O0S466 S84e 
DONE Di3e4e 600 18768 
013326 
END 01 105 
001 
01 
001 








1814 1828 1833 1839 





1552 
19268 











1389% 1508% 1510% 1513 1560% 





ODT88.P12 





OO TOT 


“wv 
mw fore-¢ 





roeee! 
PS 


Qoodovnu0n0c3 
erm 
mLco- tere a ee 
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*-006507 
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03126 
“OY 


15346 
ae 
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ry “Ri: 


1649 
S50 


-—-o 
00W 

MoO 
eA 


WPod- 
ee 


MeO 
SS GS SS OF OS OS OF OS OF OS OF 8S OF OS OS OS tS 


fururururururufe—- 
rururururulus - 
route 


Qo 
MWO ) £- OuUiuW 


tea et et ts 


iow 


+- &- = b—- b b= b= © ~ & -- b—~ 9 -< & = 9 9-< 9 9 
—-@ 


MUlUrUrUTUs— ~~ 0 -- >= oo 9 


997 


£ 


CbunearePeeueer ae tt 


“ut 
wo 


— 0 & = 8 -— b= 0 6 9 9 9 9 6 6 9 -~- 9 9 ~~ 9 po 
fe- MUU 


ww wofururury 
— — 20M 


Mm) 

a@e-(mr 
“our 
owe 
> om 


furu 
oo 
De 

c.g 


1340# 


20788 


1425 


(15288 
1427 


4 
14820 


1550 


fer te 
MMWO~IL—-Mou 
Seeseseaeqen2vuaga2eangasea 


te intowerin 


139S* 


1429 
1431 
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1826 

1968 10678 10688 10698 19708 
10798 10808 10818 10828 0838 
10928 10938 i09%8 .109S8 10968 
11058 11068 11078 11088 11098 
11188 11198 1lleOe Illele Iliedes 
ll318 ll3e8 11338 11348 11358 
11448 114Se 11468 11478 11488 
11578 11588 11598 11608 iiSls 
11708) «611718 «11728 11738) 1174s 
1183% 11848 11858 11868 11878 
11988 11978 11988 1 1738 12008 
12098 lelOs ie2lls leles ielis 
leces ic 38 leeds leese leebs 
12358) «6 le..8 «=6©12378 «6612388 = =612398 
e488 le4je i2508 125ie8 i2Ses 
lebie ie6ee 12638 leb4s 12658 
le74s le7Se i27be 2778 12788 
12878 12888 2898 12908 l29ls 
12008 13018 13028 13038 1304s 
l13l38 13148 13158 13l&s8 12178 
£13 S:4 515 Sis S17 
bb2e 1977% 1904* 1916# 19192 
Fias* el73* 21838 2184 


196* 1663% 1968 19722 


1433. «1437 M4 sLHNS L4G 
14395 «143944? IMSL 
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1 
b§ 
1 
fi 
1 
1 
1 
1 
1 
1 
1 
L 


5; 
F 







FSINIT 
P3RISR 


FSXISR 


RCVCNT= 
RCVISR 


ROVLVL 
RCVTAB 


READIN 
AOS 


rnenen 
B 


~~" 
= —4 


uiiuidalildiiaiig, 
NOUS fue 


reretateateess 40-40-4040 40 4-00 40-40-4604 
Rae 


P alba be ke! 49 2) 2) 2) Ad A A) A) ‘29 2 Dd 
a i 


MAINDEC-11-020 
O2OJBO.Pi2 


012000 
013024 


022674 


ae 


Satie 
anata 


“tg 
rates 


BBRB8 
uy 


Rl =%008001 


ee a 


“SROes REFEREN 


CE TABLE -- USER 
seue inn 17 
rd ‘ 
teas. fC SRE 
By 
¢ ’ ra 
S47a 825+ 8s 
age 87e B78 
0 4 2 
5348 788 1363 
S438 823% 996 
18Si#  18S2% 1953 
716 739 19408 
194) 19778 
§32 6438 
495 714 
1515 1579 
786 8588 
S728 
9008 
9048 - 
9088 - 
Sles 
3168 
S208 
9248 
928s 
768 
8808 
8848 
888s 
Ses 
g3he 
4508 Sos 
57S S762 
734 
ve 
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i7le 1716 1720 1724 
1714 1718 722 1726 


ess 892 8% 


i 1504 1555 
8S8 1959+ 
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1723 1732 173% 1740 
1730 1734 1738 s«1742 


900 904 908 912 


2557# iS66#  1643% i931 






1744 
174€ 





916 





1837 
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ce 


R29 =.000002 
R2SRO 010720 
RESRI_ 19740 
RESR1O0 011120 
RESR11 911140 
RESR12 O11160 
RESR13 911200 
RESR14 Olle20 
RESRIS 011240 
ROSRIE 011260 
RESRi7 011300 
ROSR2 010760 
ROSR3 011006 
ROSR4 011020 
Re 011040 
ROSRE 911060 
ROSR? 011100 
RI =x000003 
R2SRO 012274 
Rasei Olesl4 
R3SR19 910474 
35R11 012514 
RSSRi2 12534 
RasRis 012554 
R35R14 012574 
R3SRIS 032614 
R3SR16 Ole634 
R35R17 012654 
ResRe = lea 
R3SR3 912354 
R2SR4 012374 
RasR5 012414 
RaeRE  1e4N 
R3SR7 012454 
=*.000004 

RS =~000005 


1808 

20444 
4558 
Site 

2063+ 


951 
61 





* 1335" 
3 be 
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OZDJBO.Pil 


SCoPE = 1os00 


SELPRO O0617e 
XBIT 


i tot ht ad 
U1 Wrue-c> 


~4 
~ 


7 2 <M) Pater “4 
>-40-40-4 Lon! 
gaaaagS 
be 
tw 





00° 
=%000C06& 


091250 


S888888838 
SHIRSRE MOG 


ER 
BK 


ae 


oO 

oo 

— 
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<£ 


BBAzs 


oe 


952 = %F = 1339 
2eise# e163% 2168 


bo Mp o-e i 


rumen 
Won~oww 


+= >= b= b= b= 
OWuUl£ WIR CWO 
SSeseseee eee asewea4ggeseeaeaas 


SRN 


66 
36 
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x g re 9308 

\TeRe orbee et 

XISR3 OO7046 8828 

XISRY QO07066 8868 

XISRS 007106 8908 

XISR6 007126 au8 ee 

XMTCNT 003306 S468 S47 824% S46 949% 1022% 13878 1491 1494%  1503% 1316H 15714 

XMTISR 007356 870 874 878 882 886 890 894 898 90e ) 1 314 918 
: aoe Ff Rs ease 

2 a5 

XHTTAB 00! eure 66 382 saa 3 953%  1020% 1493 1497# 1501%  15Ces 


7 * 3 1341 1386% 
1ai3e 1570% 1587 1642e 1669 1774 1r7S# = =61776% = 1777 1779# 1780 1783% 1849 


X2SR0 010730 14158 
XO5R1_ 010750 14198 
XO5R10 011130 14478 
XESRi} 911150 14518 
XOSR12 011170 14558 
xeSRi3 011210 14598 
xeSR14 011230 14638 
XOSRIS 011256 14678 
XeoR1G  O11e70 14718 
XOSR17. 011310 14758 
XOSR2 - 019770 14238 
XOSR3 011010 14078 
X25R4 011030 14318 
X25R5 011050 14358 
XeSR6 011070 14398 
Xe5R7 11110 14438 
X35R0 012304 1988 
X35R1 ‘Qle3ze4 17028 
X3SR10 012504 17308 
X35R11 6125e4 17348 
X3SRi2 012544 17388 
X35R13 O1ef 34 17428 
X3SR14 01266 ; 17468 
X3SRI5 Qlet 2H 17508 
x35R1b Olek 17548 
X35R17 01266. 17588 
X35R2 012344 17068 
X35R3 O1e364 17108 
X35R4 012404 17148 
X35R5  Dle4e4 17188 
X35R6 12444 17228 
X35R7 10464 17268 
YESRT _ D1N06 sss Segx 20818 
= 015362 u788-482—(itsSB BBR CNS2BUSH® 97H) S18) SH3® ss SHGR SHH 729°C 7308 
: 1gege 19871894191. isiee 1917 19188 1920 1926 «1982 «19906-2005 
ss 2015 2032 2035 2040 204s 2071 20 2091 2100 21038 ie? 22268 
.BIT = 122000 zee 39233 a8 | 397-388 —Ssi399—Stsi«C<i‘Ssié«‘dSSDSs«éd'SSL=Ss1 894 
PRs O14222 Solze bode 2Gioe 2017" 2019 «20232039 +2034 + «2037 «203932 
PRF = O14] 42 2021 2024 : : 





PR e 20298 
-PRL 914120 2022s 2038 











‘aerate ome SINS 
DZDJBO.P 11 CROSS REFERENCE TABLE -- USER 
-PTIT 14106 2013 20188 
~-SAVRE 314400 20SS* 2059 20778 
TBIT 013324 i894 


‘ 18948 
TYPE 314822 1992% 1993 elele 2le2e2 21388 


—, 


ee ee ee ew ee oe 
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0-4 —~0~W 
REGU BSR INT RLS 
Ee Rete Keen Reem Reem Kee Kiet Reem Reem Kame Neen Keen Keen Ree Roe hon koe 








SORE ST AS 


Ste eee eee hee eee ee ee bee bee hae hee hee hoe hee hae hee hae | 





rosy o OFor 
ESSCAT SSL L TSE? 
oe hee eee hae ae bee ee hem nate ham bem bee hem ham hom kom kom } 


S: - eet A phat thy} Covta Talia) 
Bd dwt wh 8 4 od 4 4 Hm 4 oh wd 4 we 


Se hee Roce Dae Meee Reme Noe Kooee Kem loath Kam Tooen Kaee Kamm Kamm Kate Rook} 


SUBSEA A tt SEES SUR HE I 2 


2049 


Matieatatats 


Sis hereto rete tetera arta) 


1943 


tt tt 4 TU 
Fd md od oh eH ho 


Eyacavarmenenaay " 
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A Oe Rit gz 


hk hd 9d 4 ok 4 4 4 we 
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i 
2097 
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ott 4 UCU) 
Cn eee ieee kee Moen hem Noe Koen Ren Ree oe on ho cor foe ers 


BSFANT ORBIT ae = oa 


eS A aa 8 


be OO hd eh gd Hh 


mramossnssomrans § S82 B seeeee Be FR 


me heme Rem bee Roe bee Roe hoe Roto kore rn rer Poer 


1} PPP oRobs neti Teese 


Bes 8 i Ira hen ar SSeS 
add 44 44 ow ho hw 4 4 ow 4 4 4 4 4 OG 


. caeeee ee 
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Pp 


ei 
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Fy 502 
# 2161 


1 
1 
ls 
$TYPE le 21099 
SURA ls 
is 
ls 
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D0 "33 P38 ash 679 692 7 7’ 79 6 34 995 1366 4861490) =: 1502 
1849 1808 eB 1673 1681 a 1988 1878 1931 136 2133 : 
ASL 673 674 675 676 631 744 811 817 818 828 4H 1018 1019 1379 ~=61389 
1489 iB 1655 i772 1958 1960 1962 
994 154 1824 
5 813 9S 10eS =s_:1381 iso7, ss: 1S59—ssas98=Sss1800S ss 163S5)—ss«a178S~—Ss«1 861 
BCC 677 9 1390 8 1656 
BCS 590 1959 1961 1963 
BEG 632 725 741 821 947 983 999 1006 1011 1385 1492 1500 1536 1$51 1641 
ioie 1313 1827s «1838 = 1850 188) =—s«s1908’'—i—‘i‘édL‘SSOO;:;=COC*idNSSH—s1980si986Ci«dMes—iiseER— (@s«CGS— ss LY 
BGT 578 
BIC 690 694 816 834 961 990 997 1000-—ss«10 1395 1513 15899 1606 1663 1791 
1857 1988S 2134 
BICB 1984 2180 
Step 765 801 809 81031 1340 861565 )6=—s_s«a1S8&=—s«Csd1678=Sss«1867 Ss: 1964 
BIT 643 657 7e4 7 807 820 982 1384 1535 1640 1777S i812 1853 1880 1905 
1909 1956 3 «62119 
BITB 1SSO ss: 1826 
BLO 743 
BLT 2089 
BMI 1010 =: 1930 
BNE $3? 4 ee) oss 681 700 Rs RS Re RA, ae Loan eae ieee Ser 
eee e eee eee ee ee le 
js 360 "981 foso | fve?)«= fers iesy «fae «970400 fad 1920 
593 4 639 951 93 1008 1032 i407 1498 863514 170 1K 15 57 1650 
1S 1583 1880 «=—s«1836=Sss18SBti‘é«‘édEBCiiC19S—sd1HHERE—sd1991 1998 3313 20! 383 38 ele8 
1402 1685 
568 $70 $71 587 S35 628 629 678 726 768 783 797 953 9S& 
100 )=—s«d134#3'sia1SBsCéi«dISO0B=SsCisaASBO=—sC«a1589)—Sssid1614 = =ss1789)s—ia17B8SEC“‘<‘é«id BG SHE si195 1G SBD 
Ree 92 «61348 =Sss1S46HSsCs1SS94H Ss 1651 1775 Ss «1Bee_ 19989) heise OH 
577 619 660 Le 789 795 810 832 861364 )=—ss1370—Ss 1391 1393s «1620 
ge 861659 ~=—s «1661 1979s 203 e0ss « 2l3l = lu el49s lS eibS 2175 
_» Peo» Bes See 1987, 1994s 2181 
693 1499 86156. 
631 680 699 703 722 769 774 847 853 860 99 10099 1394 1349 1511 
1563 1590 1595 1603 1648 1652 1674 1682s «1789)s«d1 S965 
a 1005 = 1015s 1484S 1929 
482 599 1921 2057 2074 2106 
Ber 733 77e 831 8Se 
oa 
wig “Gg g7B 30 
493 495 600 745 
5$3 648 651 654 
384 888 890 
914 918 920 
1425 861427) 14291431 





Se Ree eee Been eee oe oor oe) 


FIP LUT RL 0 gi 


Fo hh 4 wo 4 4 0-9 oh og 


RaaN eee Geta ces ERSLATSLESAS, 


(LD) HH tet a 


Seulekeant a oteae oH OG od Od mF eo oh od HO og 





FRR SS SUARSMG ER TA SS sot BA & Lggeanegegmns 
2 ROR BueneReueerssowoy B&R UB OR PERNASGRSe, 
> a RAGOMTHGLBTSG— et au fu ~e8 we Soe SEAT 
in 
™ Ta gee af oe | Now -— =—OWUaOoO mr os w 4 o 7.04.01 
ie a eS 
~ 
q 
a. 

mr tr $54 ~ o o [va] 
oe SOLER HE SPOR Boe nos Sinn ae o a mm & i SBSABP2k 
nu -—OoOOoOT ™ DODD @OGiUNt CU LN — Tie | a] o Oo tRwo oO o 
P SRELRGSSSREMSScseoee we Sf B BES R BerzVsHessaa 
tu 

33 oo MORRO MoRLuKR +s o™ oo 
ot = 1 cucu ~~ @ w cond oa DMODOMOMOMan 

V5 PReeResSPeoesoaseeoes Se HR B FR S Bagtteae 
4 tt U Se hee heat eee het bee toe ee) 0 oe oe uw - _ 4 cu Oh hh oh od 

nw owo UWMwOMWT-Mmt wwoT @ ™ or i Cue. Cur. ~-Cur. cy 
PREBMRSEESARGES ODES «RS Be Et ts EA UIST at 
“ HHH UW 1 te 4 ray] Co Kee Kee heme tee hee Keon here foe hee ee ho) 
wrre- ~ omusr—-aooc r mM to o cw Y —-~0-.0-1. 0-7. 0- 
PResooroeeus ones SES RE REE § Seaestake essa 
on hem ieee bee) Soe hem bee hem hee hem hee bem ii) a oe | 7 1 te ook) SE AS a am See ea ne we 

o™ a OR Dine Co 4 oy ‘ OwmMowo ina 
PRPODES SRRRNTSERRUER TG BEY aR fas sygERMSeoueMeeR 


ee ee 43 92 G9 S85 SATEREEKmacercE 


PRRSRONEDT ERNE DD OP PTERGREORGN RRs Gee NNegRREnRTgERR 


Son hem Kee hee) — de RH eG dt 


DJ11 EXERCISER AND ON-LINE TESTS 


CROSS REFERENCE TABLE -- PERMANENT SYMBOLS 


DERARCES ROR TOSS PR TRRRE REET SCREMTSTUR ANNIE 
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MOV 
MOVE 
NOP 
RESET 
ROL 
ROLB 
RTI 
RTS 
RTT 
St 
SWAB 
SXT 
TRAP 
TST 
TSTB 
WAIT 
ASCII 
ASCIZ 
BLK 
BYTE 








a? ] 
cq 
oa 
Cc 


2006 


21-SEP-76 13:54 PAGE &7 
1924 1980 


LOS 
MACYLT 27(732) 
1919 


1911 


1909 


mee 


DJ11 EXERCISER AND ON-LINE TESTS 


CROSS REFERENCE TABLE -- PERMANENT SYMBOLS 


pm Ye + 


MAINDEC-11-DZ0JB-D-0 


*ZDJB0.P11 


curucuTmy 
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ERRORS DETECTED: O 
DEFAULT GLOBALS GENERATED: 0 


*, DZDJBD.SEQ/SOL/CRF=DZDJBD.MAC,DZDJBD.P11 
RUN-TIME: 19 26 4 SECONDS 

RUN-TIME RATIO: 238/50=4.6 

CORE USED: 21K (41 PAGES) 
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